home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: MacOS Resource Fork
(archive/rsrc).
id metadata |
---|
key | value |
---|
macFileType | [Zip1] |
macFileCreator | [CSU1] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 05 16 07 00 02 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 02 00 00 00 09 00 00 |........|........|
|00000020| 00 32 00 00 00 20 00 00 | 00 02 00 00 00 52 00 05 |.2... ..|.....R..|
|00000030| 42 a7 5a 69 70 31 43 53 | 55 31 00 00 00 00 00 00 |B.Zip1CS|U1......|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 01 00 00 05 | 3a 2a 00 05 39 2a 00 00 |........|:*..9*..|
|00000060| 08 7d 00 00 00 01 08 46 | 75 6a 69 20 33 37 34 81 |.}.....F|uji 374.|
|00000070| 01 00 00 00 00 62 00 00 | 00 02 a6 01 32 a9 a7 0d |.....b..|....2...|
|00000080| bb 0b 09 54 69 74 72 61 | 74 69 6f 6e 02 00 00 00 |...Titra|tion....|
|00000090| 50 61 72 74 53 49 54 78 | 00 00 00 00 00 00 00 00 |PartSITx|........|
|000000a0| 00 00 00 00 50 61 72 74 | 53 49 54 78 00 00 00 00 |....Part|SITx....|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 aa ee c1 46 | 00 00 00 00 00 05 42 a7 |.......F|......B.|
|000000d0| 69 20 33 37 34 00 00 00 | 00 00 00 00 00 00 00 00 |i 374...|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 14 00 00 00 |........|........|
|000000f0| 00 02 0e 03 02 01 4d 6f | 76 65 26 52 65 6e 61 6d |......Mo|ve&Renam|
|00000100| 65 03 01 00 00 00 00 00 | 00 00 13 f0 a7 03 46 06 |e.......|......F.|
|00000110| a7 03 46 06 00 00 00 00 | 00 00 00 00 00 00 00 00 |..F.....|........|
|00000120| 40 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |@.......|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 1a 00 00 00 00 02 14 03 |........|........|
|00000150| 43 6f 00 00 00 31 00 00 | 00 0c 00 00 00 0f 00 00 |Co...1..|........|
|00000160| 00 16 53 74 61 6e 64 61 | 72 64 69 7a 61 74 69 6f |..Standa|rdizatio|
|00000170| 6e 00 01 00 00 00 00 00 | 13 00 0e 00 0e 01 00 00 |n.......|........|
|00000180| 12 00 00 00 00 88 88 00 | 00 00 33 00 00 00 0c 00 |........|..3.....|
|00000190| 00 00 11 00 00 00 16 70 | 48 20 76 73 20 56 6f 6c |.......p|H vs Vol|
|000001a0| 75 6d 65 20 70 6c 6f 74 | 00 01 00 00 00 00 00 17 |ume plot|........|
|000001b0| 00 12 00 03 01 00 00 12 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 20 f1 10 e1 14 f1 2e | f1 2f f1 01 e2 1a 82 1a |. ......|./......|
|000001d0| 8f 1a f4 22 fe 22 f1 2d | f1 2e f1 2f f1 30 e1 2c |...".".-|.../.0.,|
|000001e0| f1 33 00 00 06 00 ff ff | ff ff ff ff f6 8f f6 d2 |.3......|........|
|000001f0| ff f7 ed 1f ed a5 ff ef | e3 af e4 78 ff e7 da 3f |........|...x...?|
|00000200| db 4b ff 81 d0 cf d2 1e | ff 81 c7 5f c8 f1 ff 81 |.K......|..._....|
|00000210| bd ef bf c4 ff 81 b4 7f | b6 97 ff 81 ab 0f ad 6a |........|.......j|
|00000220| ff 81 a1 9f a4 3d ff 81 | 98 2f 9b 10 ff 81 8e bf |.....=..|./......|
|00000230| 91 e3 ff 81 85 4f 88 b6 | ff 81 7b df 7f 89 ff 81 |.....O..|..{.....|
|00000240| 72 66 76 56 ff 81 fd ea | ff ff b9 af fd fd fc 92 |rfvV....|........|
|00000250| b8 d7 fe 10 f9 25 b7 ff | fe 23 f5 b8 b7 27 fe 36 |.....%..|.#...'.6|
|00000260| f2 4b b6 4f fe 49 ee de | b5 77 fe 5c eb 71 b4 9f |.K.O.I..|.w.\.q..|
|00000270| fe 6f e8 04 b3 c7 fe 82 | e4 97 b2 ef fe 95 e1 2a |.o......|.......*|
|00000280| b2 17 fe a8 dd bd b1 3f | fe bb da 50 b0 67 fe ce |.......?|...P.g..|
|00000290| d6 e3 af 8f fe e1 d3 76 | ae b7 fe f4 d0 09 ad df |.......v|........|
|000002a0| ff 07 cc 9c ad 07 ff 1a | c9 2f ac 2f ff 2d c5 c2 |........|././.-..|
|000002b0| ab 57 ff 40 c2 55 aa 7f | ff 53 be e8 a9 a7 ff 66 |.W.@.U..|.S.....f|
|000002c0| bb 7b a8 cf ff 79 b8 0e | a7 f7 ff 8c b4 a1 a7 1f |.{...y..|........|
|000002d0| ff ff b1 34 a6 47 ff ff | ad c7 a5 6f ff ff aa 5a |...4.G..|...o...Z|
|000002e0| a4 97 ff ff a6 ed a3 bf | ff ff a3 80 a2 e7 ff ff |........|........|
|000002f0| 9f f9 a1 f8 cc cc cc cc | 66 66 cc cc cc cc 33 33 |........|ff....33|
|00000300| cc cc cc cc 00 00 cc cc | 99 99 ff ff cc cc 99 99 |........|........|
|00000310| cc cc ff ff fb ea 02 3d | ff ff 00 00 00 00 cc cc |.......=|........|
|00000320| 99 99 33 33 cc cc 99 99 | 00 00 cc cc 66 66 ff ff |..33....|....ff..|
|00000330| c7 5f c8 f1 ff 81 cc cc | 66 66 99 99 cc cc 66 66 |._......|ff....ff|
|00000340| 66 66 cc cc 66 66 33 33 | cc cc 66 66 00 00 cc cc |ff..ff33|..ff....|
|00000350| 33 33 ff ff cc cc 33 33 | cc cc cc cc 33 33 99 99 |33....33|....33..|
|00000360| cc cc 33 33 66 66 cc cc | 33 33 33 33 cc cc 33 33 |..33ff..|3333..33|
|00000370| 00 00 cc cc 00 00 ff ff | cc cc 00 00 cc cc cc cc |........|........|
|00000380| 00 00 99 99 cc cc 00 00 | 66 66 cc cc 00 00 33 33 |........|ff....33|
|00000390| cc cc 00 00 00 00 99 99 | ff ff ff ff 99 99 ff ff |........|........|
|000003a0| cc cc 99 99 ff ff 99 99 | 99 99 ff ff 66 66 99 99 |........|....ff..|
|000003b0| ff ff 33 33 99 99 ff ff | 00 00 99 99 cc cc ff ff |..33....|........|
|000003c0| 99 99 cc cc cc cc 99 99 | cc cc 99 99 99 99 cc cc |........|........|
|000003d0| 66 66 99 99 cc cc 33 33 | 99 99 cc cc 00 00 99 99 |ff....33|........|
|000003e0| 99 99 ff ff 99 99 99 99 | cc cc 99 99 99 99 99 99 |........|........|
|000003f0| 99 99 99 99 66 66 99 99 | 99 99 33 33 99 99 99 99 |....ff..|..33....|
|00000400| 00 00 99 99 66 66 ff ff | 99 99 66 66 cc cc 99 99 |....ff..|..ff....|
|00000410| 66 66 99 99 99 99 66 66 | 66 66 99 99 66 66 33 33 |ff....ff|ff..ff33|
|00000420| 99 99 66 66 00 00 99 99 | 33 33 ff ff 99 99 33 33 |..ff....|33....33|
|00000430| cc cc 99 99 33 33 99 99 | 99 99 33 33 66 66 99 99 |....33..|..33ff..|
|00000440| 33 33 33 33 99 99 33 33 | 00 00 99 99 00 00 ff ff |3333..33|........|
|00000450| 99 99 00 00 cc cc 99 99 | 00 00 99 99 99 99 00 00 |........|........|
|00000460| 66 66 99 99 00 00 33 33 | 00 00 00 00 ee ee 00 00 |ff....33|........|
|00000470| 00 00 dd dd 00 00 00 00 | bb bb 00 00 00 00 aa aa |........|........|
|00000480| 00 00 00 00 88 88 66 66 | ff ff 33 33 66 66 ff ff |......ff|..33ff..|
|00000490| 00 00 66 66 cc cc ff ff | 66 66 cc cc cc cc 66 66 |..ff....|ff....ff|
|000004a0| cc cc 99 99 66 66 cc cc | 66 66 66 66 cc cc 33 33 |....ff..|ffff..33|
|000004b0| 66 66 cc cc 00 00 66 66 | 99 99 ff ff 66 66 99 99 |ff....ff|....ff..|
|000004c0| cc cc 66 66 99 99 99 99 | 66 66 99 99 66 66 66 66 |..ff....|ff..ffff|
|000004d0| 99 99 33 33 66 66 99 99 | 00 00 66 66 66 66 ff ff |..33ff..|..ffff..|
|000004e0| 66 66 66 66 cc cc 66 66 | 66 66 99 99 66 66 66 66 |ffff..ff|ff..ffff|
|000004f0| 66 66 66 66 66 66 33 33 | 66 66 66 66 00 00 66 66 |ffffff33|ffff..ff|
|00000500| 33 33 ff ff 66 66 33 33 | cc cc 66 66 33 33 99 99 |33..ff33|..ff33..|
|00000510| 66 66 33 33 66 66 66 66 | 33 33 33 33 66 66 33 33 |ff33ffff|3333ff33|
|00000520| 00 00 66 66 00 00 ff ff | 66 66 00 00 cc cc 66 66 |..ff....|ff....ff|
|00000530| 00 00 99 99 66 66 00 00 | 66 66 66 66 00 00 33 33 |....ff..|ffff..33|
|00000540| 66 66 00 00 00 00 33 33 | ff ff ff ff 33 33 ff ff |ff....33|....33..|
|00000550| cc cc 33 33 ff ff 99 99 | 33 33 ff ff 66 66 33 33 |..33....|33..ff33|
|00000560| ff ff 33 33 33 33 ff ff | 00 00 33 33 cc cc ff ff |..3333..|..33....|
|00000570| 33 33 cc cc cc cc 33 33 | cc cc 99 99 33 33 cc cc |33....33|....33..|
|00000580| 66 66 33 33 cc cc 33 33 | 33 33 cc cc 00 00 33 33 |ff33..33|33....33|
|00000590| 99 99 ff ff 33 33 99 99 | cc cc 33 33 99 99 99 99 |....33..|..33....|
|000005a0| 33 33 99 99 66 66 33 33 | 99 99 33 33 33 33 99 99 |33..ff33|..3333..|
|000005b0| 00 00 33 33 66 66 ff ff | 33 33 66 66 cc cc 33 33 |..33ff..|33ff..33|
|000005c0| 66 66 99 99 33 33 66 66 | 66 66 33 33 66 66 33 33 |ff..33ff|ff33ff33|
|000005d0| 33 33 66 66 00 00 33 33 | 33 33 ff ff 33 33 33 33 |33ff..33|33..3333|
|000005e0| cc cc 33 33 33 33 99 99 | 33 33 33 33 66 66 33 33 |..3333..|3333ff33|
|000005f0| 33 33 33 33 33 33 33 33 | 00 00 33 33 00 00 ff ff |33333333|..33....|
|00000600| 33 33 00 00 cc cc 33 33 | 00 00 99 99 33 33 00 00 |33....33|....33..|
|00000610| 66 66 33 33 00 00 33 33 | 33 33 00 00 00 00 00 00 |ff33..33|33......|
|00000620| ff ff ff ff 00 00 ff ff | cc cc 00 00 ff ff 99 99 |........|........|
|00000630| 00 00 ff ff 66 66 00 00 | ff ff 33 33 00 00 ff ff |....ff..|..33....|
|00000640| 00 00 00 00 cc cc ff ff | 00 00 cc cc cc cc 00 00 |........|........|
|00000650| cc cc 99 99 00 00 cc cc | 66 66 00 00 cc cc 33 33 |........|ff....33|
|00000660| 00 00 cc cc 00 00 00 00 | 99 99 ff ff 00 00 99 99 |........|........|
|00000670| cc cc 00 00 99 99 99 99 | 00 00 99 99 66 66 00 00 |........|....ff..|
|00000680| 99 99 33 33 00 00 99 99 | 00 00 00 00 66 66 ff ff |..33....|....ff..|
|00000690| 00 00 66 66 cc cc 00 00 | 66 66 99 99 00 00 66 66 |..ff....|ff....ff|
|000006a0| 66 66 00 00 66 66 33 33 | 00 00 66 66 00 00 00 00 |ff..ff33|..ff....|
|000006b0| 33 33 ff ff 00 00 33 33 | cc cc 00 00 33 33 99 99 |33....33|....33..|
|000006c0| 00 00 33 33 66 66 00 00 | 33 33 33 33 00 00 33 33 |..33ff..|3333..33|
|000006d0| 00 00 00 00 00 00 ff ff | 00 00 00 00 cc cc 00 00 |........|........|
|000006e0| 00 00 99 99 00 00 00 00 | 66 66 00 00 00 00 33 33 |........|ff....33|
|000006f0| ee ee 00 00 00 00 dd dd | 00 00 00 00 bb bb 00 00 |........|........|
|00000700| 00 00 aa aa 00 00 00 00 | 88 88 00 00 00 00 77 77 |........|......ww|
|00000710| 00 00 00 00 55 55 00 00 | 00 00 44 44 00 00 00 00 |....UU..|..DD....|
|00000720| 22 22 00 00 00 00 95 1a | 95 d5 c2 74 00 00 ee ee |""......|...t....|
|00000730| 00 00 00 00 dd dd 00 00 | 00 00 bb bb 00 00 00 00 |........|........|
|00000740| aa aa 00 00 00 00 88 88 | 00 00 00 00 77 77 00 00 |........|....ww..|
|00000750| 00 00 55 55 00 00 00 00 | 44 44 00 00 00 00 22 22 |..UU....|DD....""|
|00000760| 00 00 ee ee ee ee ee ee | e3 8e e3 8e e3 8e d8 2e |........|........|
|00000770| d8 2e d8 2e cc ce cc ce | cc ce c1 6e c1 6e c1 6e |........|...n.n.n|
|00000780| b6 0e b6 0e b6 0e aa ae | aa ae aa ae 9f 4e 9f 4e |........|.....N.N|
|00000790| 9f 4e 93 ee 93 ee 93 ee | 88 8e 88 8e 88 8e 7d 2e |.N......|......}.|
|000007a0| 7d 2e 7d 2e 71 ce 71 ce | 71 ce 66 6e 66 6e 66 6e |}.}.q.q.|q.fnfnfn|
|000007b0| 5b 0e 5b 0e 5b 0e 4f ae | 4f ae 4f ae 44 4e 44 4e |[.[.[.O.|O.O.DNDN|
|000007c0| 44 4e 38 ee 38 ee 38 ee | 2d 8e 2d 8e 2d 8e 22 2e |DN8.8.8.|-.-.-.".|
|000007d0| 22 2e 22 2e 16 ce 16 ce | 16 ce 0b 6e 0b 6e 0b 6e |".".....|...n.n.n|
|000007e0| 00 00 00 00 00 00 00 00 | 00 33 00 00 00 10 00 00 |........|.3......|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 05 00 00 00 00 |........|........|
|00000800| 00 00 00 00 00 00 00 09 | 00 00 00 09 00 00 00 09 |........|........|
|00000810| 00 00 00 09 08 6e 65 77 | 20 6d 65 74 68 00 00 1f |.....new| meth...|
|00000820| af 00 00 00 0c 00 00 1d | fd 00 00 01 a6 2d 2d 0d |........|.....--.|
|00000830| 6d 61 63 72 6f 20 45 78 | 69 74 55 6e 69 74 0d 2d |macro Ex|itUnit.-|
|00000840| 2d 20 64 69 73 70 6f 73 | 65 20 6f 66 20 66 61 63 |- dispos|e of fac|
|00000850| 74 6f 72 79 20 6f 62 6a | 65 63 74 73 20 2d 2d 0d |tory obj|ects --.|
|00000860| 67 6c 6f 62 61 6c 20 70 | 68 61 73 65 43 6f 75 6e |global p|haseCoun|
|00000870| 74 2c 50 68 61 73 65 50 | 6f 69 6e 74 65 72 73 2c |t,PhaseP|ointers,|
|00000880| 54 72 69 61 6c 43 6f 75 | 6e 74 0d 73 65 74 20 54 |TrialCou|nt.set T|
|00000890| 72 69 61 6c 43 6f 75 6e | 74 20 3d 20 30 20 2d 2d |rialCoun|t = 0 --|
|000008a0| 20 66 6f 72 20 66 75 6c | 6c 20 74 72 65 61 74 6d | for ful|l treatm|
|000008b0| 65 6e 74 2c 20 6e 65 78 | 74 20 67 6f 2d 61 72 6f |ent, nex|t go-aro|
|000008c0| 75 6e 64 0d 69 66 20 6f | 62 6a 65 63 74 70 28 50 |und.if o|bjectp(P|
|000008d0| 68 61 73 65 50 6f 69 6e | 74 65 72 73 29 20 74 68 |hasePoin|ters) th|
|000008e0| 65 6e 0d 72 65 70 65 61 | 74 20 77 69 74 68 20 69 |en.repea|t with i|
|000008f0| 20 3d 20 31 20 74 6f 20 | 70 68 61 73 65 43 6f 75 | = 1 to |phaseCou|
|00000900| 6e 74 20 2d 2d 20 6e 75 | 6d 62 65 72 20 6f 66 20 |nt -- nu|mber of |
|00000910| 65 66 66 65 63 74 20 70 | 68 61 73 65 20 72 65 63 |effect p|hase rec|
|00000920| 6f 72 64 73 0d 69 66 20 | 6f 62 6a 65 63 74 70 28 |ords.if |objectp(|
|00000930| 50 68 61 73 65 50 6f 69 | 6e 74 65 72 73 28 6d 67 |PhasePoi|nters(mg|
|00000940| 65 74 2c 69 29 29 20 74 | 68 65 6e 20 50 68 61 73 |et,i)) t|hen Phas|
|00000950| 65 50 6f 69 6e 74 65 72 | 73 28 6d 67 65 74 2c 69 |ePointer|s(mget,i|
|00000960| 29 28 6d 44 69 73 70 6f | 73 65 29 0d 65 6e 64 20 |)(mDispo|se).end |
|00000970| 72 65 70 65 61 74 0d 65 | 6e 64 20 69 66 0d 67 6c |repeat.e|nd if.gl|
|00000980| 6f 62 61 6c 20 4d 61 74 | 68 50 61 63 6b 61 67 65 |obal Mat|hPackage|
|00000990| 2c 20 50 48 73 65 72 69 | 65 73 52 65 63 6f 72 64 |, PHseri|esRecord|
|000009a0| 2c 56 6f 6c 53 65 72 69 | 65 73 52 65 63 6f 72 64 |,VolSeri|esRecord|
|000009b0| 2c 20 50 48 70 6f 69 6e | 74 73 0d 69 66 20 6f 62 |, PHpoin|ts.if ob|
|000009c0| 6a 65 63 74 70 28 50 68 | 61 73 65 50 6f 69 6e 74 |jectp(Ph|asePoint|
|000009d0| 65 72 73 29 20 74 68 65 | 6e 20 50 68 61 73 65 50 |ers) the|n PhaseP|
|000009e0| 6f 69 6e 74 65 72 73 28 | 6d 44 69 73 70 6f 73 65 |ointers(|mDispose|
|000009f0| 29 0d 69 66 20 6f 62 6a | 65 63 74 70 28 4d 61 74 |).if obj|ectp(Mat|
|00000a00| 68 50 61 63 6b 61 67 65 | 29 20 74 68 65 6e 20 4d |hPackage|) then M|
|00000a10| 61 74 68 50 61 63 6b 61 | 67 65 28 6d 44 69 73 70 |athPacka|ge(mDisp|
|00000a20| 6f 73 65 29 20 2d 2d 20 | 6c 65 61 76 65 20 63 6c |ose) -- |leave cl|
|00000a30| 65 61 6e 20 4d 65 6d 6f | 72 79 0d 69 66 20 6f 62 |ean Memo|ry.if ob|
|00000a40| 6a 65 63 74 70 28 50 48 | 73 65 72 69 65 73 52 65 |jectp(PH|seriesRe|
|00000a50| 63 6f 72 64 29 20 74 68 | 65 6e 20 50 48 73 65 72 |cord) th|en PHser|
|00000a60| 69 65 73 52 65 63 6f 72 | 64 28 6d 44 69 73 70 6f |iesRecor|d(mDispo|
|00000a70| 73 65 29 0d 69 66 20 6f | 62 6a 65 63 74 70 28 56 |se).if o|bjectp(V|
|00000a80| 6f 6c 53 65 72 69 65 73 | 52 65 63 6f 72 64 29 20 |olSeries|Record) |
|00000a90| 74 68 65 6e 20 56 6f 6c | 53 65 72 69 65 73 52 65 |then Vol|SeriesRe|
|00000aa0| 63 6f 72 64 28 6d 44 69 | 73 70 6f 73 65 29 0d 69 |cord(mDi|spose).i|
|00000ab0| 66 20 6f 62 6a 65 63 74 | 70 28 50 48 70 6f 69 6e |f object|p(PHpoin|
|00000ac0| 74 73 29 20 74 68 65 6e | 20 50 48 70 6f 69 6e 74 |ts) then| PHpoint|
|00000ad0| 73 28 6d 44 69 73 70 6f | 73 65 29 0d 0d 0d 0d 2d |s(mDispo|se)....-|
|00000ae0| 2d 51 75 69 74 20 2d 2d | 2a 2a 2a 2a 20 66 6f 72 |-Quit --|**** for|
|00000af0| 20 73 74 61 6e 64 61 6c | 6f 6e 65 20 2a 2a 2a 2a | standal|one ****|
|00000b00| 0d 73 65 74 20 69 20 3d | 20 31 0d 72 65 70 65 61 |.set i =| 1.repea|
|00000b10| 74 20 77 68 69 6c 65 20 | 69 20 3c 3d 20 32 34 0d |t while |i <= 24.|
|00000b20| 73 65 74 20 74 68 65 20 | 70 75 70 70 65 74 20 6f |set the |puppet o|
|00000b30| 66 20 73 70 72 69 74 65 | 20 69 20 3d 20 66 61 6c |f sprite| i = fal|
|00000b40| 73 65 0d 73 65 74 20 69 | 20 3d 20 69 20 2b 20 31 |se.set i| = i + 1|
|00000b50| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 67 6f 20 74 |.end rep|eat.go t|
|00000b60| 6f 20 66 72 61 6d 65 20 | 22 42 79 65 22 0d 0d 6d |o frame |"Bye"..m|
|00000b70| 61 63 72 6f 20 52 65 70 | 6f 72 74 4d 6f 75 73 65 |acro Rep|ortMouse|
|00000b80| 20 2d 2d 20 63 6d 64 2d | 70 65 72 69 6f 64 20 74 | -- cmd-|period t|
|00000b90| 6f 20 65 6e 64 0d 72 65 | 70 65 61 74 20 77 68 69 |o end.re|peat whi|
|00000ba0| 6c 65 20 74 72 75 65 0d | 20 20 20 20 69 66 20 74 |le true.| if t|
|00000bb0| 68 65 20 6d 6f 75 73 65 | 44 6f 77 6e 20 74 68 65 |he mouse|Down the|
|00000bc0| 6e 0d 20 20 20 20 20 20 | 20 20 70 75 74 20 74 68 |n. | put th|
|00000bd0| 65 20 4d 6f 75 73 65 48 | 20 26 22 20 2c 20 22 26 |e MouseH| &" , "&|
|00000be0| 20 74 68 65 20 4d 6f 75 | 73 65 56 0d 20 20 20 20 | the Mou|seV. |
|00000bf0| 20 20 20 20 72 65 70 65 | 61 74 20 77 68 69 6c 65 | repe|at while|
|00000c00| 20 74 68 65 20 6d 6f 75 | 73 65 44 6f 77 6e 20 2d | the mou|seDown -|
|00000c10| 2d 20 6f 6e 65 20 72 65 | 70 6f 72 74 20 70 65 72 |- one re|port per|
|00000c20| 20 63 6c 69 63 6b 0d 20 | 20 20 20 20 20 20 20 65 | click. | e|
|00000c30| 6e 64 20 72 65 70 65 61 | 74 0d 20 20 20 20 65 6e |nd repea|t. en|
|00000c40| 64 20 69 66 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |d if.end| repeat.|
|00000c50| 0d 6d 61 63 72 6f 20 53 | 68 6f 77 70 48 0d 2d 2d |.macro S|howpH.--|
|00000c60| 65 78 69 74 0d 67 6c 6f | 62 61 6c 20 4c 61 73 74 |exit.glo|bal Last|
|00000c70| 53 68 6f 77 6e 56 6f 6c | 2c 43 75 72 72 65 6e 74 |ShownVol|,Current|
|00000c80| 56 6f 6c 75 6d 65 2c 50 | 48 70 6f 69 6e 74 73 2c |Volume,P|Hpoints,|
|00000c90| 70 68 31 30 30 0d 67 6c | 6f 62 61 6c 20 50 48 73 |ph100.gl|obal PHs|
|00000ca0| 65 72 69 65 73 52 65 63 | 6f 72 64 2c 56 6f 6c 53 |eriesRec|ord,VolS|
|00000cb0| 65 72 69 65 73 52 65 63 | 6f 72 64 2c 20 50 6c 6f |eriesRec|ord, Plo|
|00000cc0| 74 4d 6f 64 65 2c 20 4d | 65 74 65 72 4d 6f 64 65 |tMode, M|eterMode|
|00000cd0| 0d 69 66 20 4c 61 73 74 | 53 68 6f 77 6e 56 6f 6c |.if Last|ShownVol|
|00000ce0| 20 3c 3e 20 43 75 72 72 | 65 6e 74 56 6f 6c 75 6d | <> Curr|entVolum|
|00000cf0| 65 20 74 68 65 6e 20 0d | 20 20 20 20 47 65 74 50 |e then .| GetP|
|00000d00| 48 20 2d 2d 20 63 6f 6d | 70 75 74 65 20 69 74 0d |H -- com|pute it.|
|00000d10| 20 20 20 20 69 66 20 50 | 6c 6f 74 4d 6f 64 65 20 | if P|lotMode |
|00000d20| 74 68 65 6e 20 50 6c 6f | 74 70 48 20 2d 2d 20 70 |then Plo|tpH -- p|
|00000d30| 6c 6f 74 20 63 75 72 76 | 65 20 73 65 67 6d 65 6e |lot curv|e segmen|
|00000d40| 74 0d 73 65 74 20 50 48 | 70 6f 69 6e 74 73 20 3d |t.set PH|points =|
|00000d50| 20 50 48 70 6f 69 6e 74 | 73 20 2b 20 31 0d 50 48 | PHpoint|s + 1.PH|
|00000d60| 73 65 72 69 65 73 52 65 | 63 6f 72 64 28 6d 50 75 |seriesRe|cord(mPu|
|00000d70| 74 2c 50 48 70 6f 69 6e | 74 73 2c 70 68 31 30 30 |t,PHpoin|ts,ph100|
|00000d80| 29 20 2d 2d 20 73 74 6f | 72 65 20 66 6f 72 20 72 |) -- sto|re for r|
|00000d90| 65 70 6c 6f 74 20 6c 61 | 74 65 72 0d 56 6f 6c 53 |eplot la|ter.VolS|
|00000da0| 65 72 69 65 73 52 65 63 | 6f 72 64 28 6d 50 75 74 |eriesRec|ord(mPut|
|00000db0| 2c 50 48 70 6f 69 6e 74 | 73 2c 43 75 72 72 65 6e |,PHpoint|s,Curren|
|00000dc0| 74 56 6f 6c 75 6d 65 29 | 0d 2d 2d 20 28 20 6d 61 |tVolume)|.-- ( ma|
|00000dd0| 79 20 77 61 6e 74 20 74 | 6f 20 73 61 76 65 20 61 |y want t|o save a|
|00000de0| 6c 6c 20 34 20 72 75 6e | 73 3f 3f 20 29 0d 20 20 |ll 4 run|s?? ). |
|00000df0| 20 20 69 66 20 4d 65 74 | 65 72 4d 6f 64 65 20 74 | if Met|erMode t|
|00000e00| 68 65 6e 20 44 69 73 70 | 6c 61 79 70 48 31 30 30 |hen Disp|laypH100|
|00000e10| 20 2d 2d 20 64 69 73 70 | 6c 61 79 20 6f 6e 20 6d | -- disp|lay on m|
|00000e20| 65 74 65 72 0d 20 20 20 | 20 75 70 64 61 74 65 73 |eter. | updates|
|00000e30| 74 61 67 65 0d 20 20 20 | 20 73 65 74 20 4c 61 73 |tage. | set Las|
|00000e40| 74 53 68 6f 77 6e 56 6f | 6c 20 3d 20 43 75 72 72 |tShownVo|l = Curr|
|00000e50| 65 6e 74 56 6f 6c 75 6d | 65 20 2d 2d 20 69 67 6e |entVolum|e -- ign|
|00000e60| 6f 72 65 20 72 65 70 65 | 61 74 65 64 20 63 61 6c |ore repe|ated cal|
|00000e70| 6c 73 0d 65 6e 64 20 69 | 66 0d 0d 6d 61 63 72 6f |ls.end i|f..macro|
|00000e80| 20 47 65 74 50 48 0d 67 | 6c 6f 62 61 6c 20 43 75 | GetPH.g|lobal Cu|
|00000e90| 72 72 65 6e 74 56 6f 6c | 75 6d 65 2c 46 6c 61 73 |rrentVol|ume,Flas|
|00000ea0| 6b 56 6f 6c 75 6d 65 2c | 20 45 71 75 69 76 65 6c |kVolume,| Equivel|
|00000eb0| 61 6e 63 65 5f 56 6f 6c | 75 6d 65 2c 45 71 75 69 |ance_Vol|ume,Equi|
|00000ec0| 76 43 6f 75 6e 74 2c 45 | 51 57 54 0d 67 6c 6f 62 |vCount,E|QWT.glob|
|00000ed0| 61 6c 20 42 75 72 65 74 | 4f 66 66 73 65 74 2c 69 |al Buret|Offset,i|
|00000ee0| 6e 69 74 69 61 6c 56 6f | 6c 2c 70 68 31 30 30 2c |nitialVo|l,ph100,|
|00000ef0| 4d 61 73 73 0d 2d 2d 20 | 70 48 20 53 74 72 6f 6e |Mass.-- |pH Stron|
|00000f00| 67 20 41 63 69 64 20 58 | 46 43 4e 0d 2d 2d 20 28 |g Acid X|FCN.-- (|
|00000f10| 6d 61 73 73 2a 31 30 30 | 30 30 2c 65 71 77 74 2a |mass*100|00,eqwt*|
|00000f20| 31 30 30 2c 69 6e 69 74 | 76 6f 6c 2a 31 30 30 2c |100,init|vol*100,|
|00000f30| 63 75 72 72 65 6e 74 76 | 6f 6c 2a 31 30 30 2c 6e |currentv|ol*100,n|
|00000f40| 6f 72 6d 2a 31 30 30 30 | 30 2c 72 65 74 2e 73 63 |orm*1000|0,ret.sc|
|00000f50| 61 6c 65 20 66 61 63 74 | 6f 72 29 0d 2d 2d 73 65 |ale fact|or).--se|
|00000f60| 74 20 70 68 47 6f 74 20 | 3d 20 74 72 75 65 0d 2d |t phGot |= true.-|
|00000f70| 2d 25 25 25 20 66 6f 72 | 6d 65 72 6c 79 20 63 6f |-%%% for|merly co|
|00000f80| 6d 70 75 74 65 64 20 62 | 79 20 68 79 70 65 72 62 |mputed b|y hyperb|
|00000f90| 61 73 69 63 20 78 66 63 | 6e 20 74 68 61 74 20 62 |asic xfc|n that b|
|00000fa0| 6f 6d 62 73 20 69 6e 20 | 64 69 72 65 63 74 6f 72 |ombs in |director|
|00000fb0| 20 33 2e 30 0d 2d 2d 25 | 25 25 20 73 65 74 20 70 | 3.0.--%|%% set p|
|00000fc0| 68 20 3d 20 69 6e 74 65 | 67 65 72 28 76 61 6c 75 |h = inte|ger(valu|
|00000fd0| 65 28 70 48 73 61 28 4d | 61 73 73 2c 33 36 34 35 |e(pHsa(M|ass,3645|
|00000fe0| 2c 49 6e 69 74 69 61 6c | 56 6f 6c 2c 43 75 72 72 |,Initial|Vol,Curr|
|00000ff0| 65 6e 74 56 6f 6c 75 6d | 65 20 2d 20 42 75 72 65 |entVolum|e - Bure|
|00001000| 74 4f 66 66 73 65 74 2c | 31 30 30 30 2c 31 30 30 |tOffset,|1000,100|
|00001010| 29 29 29 0d 2d 2d 2a 2a | 2a 20 6e 65 77 20 76 65 |))).--**|* new ve|
|00001020| 72 73 69 6f 6e 20 75 73 | 69 6e 67 20 73 69 6d 70 |rsion us|ing simp|
|00001030| 6c 65 20 4c 4f 47 28 29 | 20 58 46 43 4e 20 20 48 |le LOG()| XFCN H|
|00001040| 79 70 65 72 62 61 73 69 | 63 20 4c 4f 47 28 29 20 |yperbasi|c LOG() |
|00001050| 62 6f 6d 62 73 20 6f 6e | 20 71 75 61 64 72 61 20 |bombs on| quadra |
|00001060| 63 61 63 68 65 0d 2d 2d | 2a 2a 2a 20 36 2f 39 32 |cache.--|*** 6/92|
|00001070| 20 20 54 68 69 6e 6b 2d | 43 20 58 6f 62 6a 65 63 | Think-|C Xobjec|
|00001080| 74 20 6d 61 74 68 20 70 | 61 63 6b 61 67 65 20 69 |t math p|ackage i|
|00001090| 6e 20 64 65 76 65 6c 6f | 70 6d 65 6e 74 0d 67 6c |n develo|pment.gl|
|000010a0| 6f 62 61 6c 20 43 20 2c | 48 2c 70 31 2c 76 31 2c |obal C ,|H,p1,v1,|
|000010b0| 6e 6f 72 6d 20 2d 2d 24 | 24 24 20 61 6c 6c 20 66 |norm --$|$$ all f|
|000010c0| 6f 72 20 64 65 62 75 67 | 20 6f 6e 6c 79 0d 73 65 |or debug| only.se|
|000010d0| 74 20 56 31 20 3d 20 20 | 28 43 75 72 72 65 6e 74 |t V1 = |(Current|
|000010e0| 56 6f 6c 75 6d 65 20 2d | 20 42 75 72 65 74 4f 66 |Volume -| BuretOf|
|000010f0| 66 73 65 74 20 2b 20 30 | 2e 30 29 20 2f 20 31 30 |fset + 0|.0) / 10|
|00001100| 30 20 2d 2d 20 20 0d 73 | 65 74 20 4e 6f 72 6d 20 |0 -- .s|et Norm |
|00001110| 3d 20 2e 31 0d 73 65 74 | 20 43 20 3d 20 28 20 45 |= .1.set| C = ( E|
|00001120| 71 75 69 76 43 6f 75 6e | 74 20 2b 20 30 2e 30 29 |quivCoun|t + 0.0)|
|00001130| 20 2f 20 2e 31 20 2d 2d | 20 20 20 2f 20 6e 6f 72 | / .1 --| / nor|
|00001140| 6d 61 6c 69 74 79 20 20 | 20 28 31 30 30 30 30 20 |mality | (10000 |
|00001150| 3f 29 0d 2d 2d 70 75 74 | 20 22 76 31 2c 43 3d 22 |?).--put| "v1,C="|
|00001160| 26 56 31 26 22 20 22 26 | 43 20 2d 2d 24 24 24 0d |&V1&" "&|C --$$$.|
|00001170| 69 66 20 76 31 20 3d 20 | 30 20 74 68 65 6e 20 0d |if v1 = |0 then .|
|00001180| 20 20 20 20 73 65 74 20 | 48 20 3d 20 30 2e 30 20 | set |H = 0.0 |
|00001190| 2b 20 45 71 75 69 76 43 | 6f 75 6e 74 20 2f 20 28 |+ EquivC|ount / (|
|000011a0| 49 6e 69 74 69 61 6c 56 | 6f 6c 20 2f 20 31 30 30 |InitialV|ol / 100|
|000011b0| 29 0d 20 20 20 20 2d 2d | 70 75 74 20 22 76 31 20 |). --|put "v1 |
|000011c0| 3d 20 30 2c 20 48 3d 22 | 26 20 48 20 2d 2d 24 24 |= 0, H="|& H --$$|
|000011d0| 24 0d 20 20 20 20 73 65 | 74 20 50 31 20 3d 20 30 |$. se|t P1 = 0|
|000011e0| 2e 30 20 2b 20 2d 28 4c | 6f 67 31 30 28 48 29 29 |.0 + -(L|og10(H))|
|000011f0| 20 2d 2d 20 6d 4c 4f 47 | 20 66 72 6f 6d 20 6d 61 | -- mLOG| from ma|
|00001200| 74 68 20 58 43 4f 44 0d | 65 6c 73 65 0d 20 20 20 |th XCOD.|else. |
|00001210| 20 69 66 20 76 31 20 3e | 20 43 20 74 68 65 6e 0d | if v1 >| C then.|
|00001220| 20 20 20 20 20 20 20 20 | 20 2d 2d 20 2a 31 30 20 | | -- *10 |
|00001230| 3d 20 2a 20 6e 6f 72 6d | 61 6c 69 74 79 0d 20 20 |= * norm|ality. |
|00001240| 20 20 20 20 20 20 73 65 | 74 20 4f 48 20 3d 20 30 | se|t OH = 0|
|00001250| 2e 30 20 2b 20 28 28 56 | 31 20 2a 20 4e 6f 72 6d |.0 + ((V|1 * Norm|
|00001260| 29 20 2d 20 45 71 75 69 | 76 43 6f 75 6e 74 29 20 |) - Equi|vCount) |
|00001270| 2f 20 28 76 31 20 2b 20 | 49 6e 69 74 69 61 6c 56 |/ (v1 + |InitialV|
|00001280| 6f 6c 2f 31 30 30 29 20 | 0d 2d 2d 70 75 74 20 22 |ol/100) |.--put "|
|00001290| 76 31 20 3e 20 43 2c 20 | 4f 48 3d 22 26 20 4f 48 |v1 > C, |OH="& OH|
|000012a0| 20 2d 2d 24 24 24 0d 20 | 20 20 20 20 20 20 73 65 | --$$$. | se|
|000012b0| 74 20 50 31 20 3d 20 30 | 2e 30 20 2b 20 31 34 20 |t P1 = 0|.0 + 14 |
|000012c0| 2d 20 28 20 2d 20 28 4c | 6f 67 31 30 28 4f 48 29 |- ( - (L|og10(OH)|
|000012d0| 29 29 0d 20 20 20 20 65 | 6c 73 65 0d 20 20 20 20 |)). e|lse. |
|000012e0| 20 20 20 20 69 66 20 76 | 31 20 3d 20 43 20 74 68 | if v|1 = C th|
|000012f0| 65 6e 0d 20 20 20 20 20 | 20 20 20 20 20 20 73 65 |en. | se|
|00001300| 74 20 50 31 20 3d 20 37 | 2e 30 30 0d 20 20 20 20 |t P1 = 7|.00. |
|00001310| 20 20 20 20 65 6c 73 65 | 20 2d 2d 6d 75 73 74 20 | else| --must |
|00001320| 62 65 22 3a 20 20 56 31 | 20 20 3c 20 43 0d 20 20 |be": V1| < C. |
|00001330| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 48 20 | | set H |
|00001340| 3d 20 30 2e 30 20 2b 20 | 28 20 45 71 75 69 76 43 |= 0.0 + |( EquivC|
|00001350| 6f 75 6e 74 20 2d 20 56 | 31 20 2a 20 4e 6f 72 6d |ount - V|1 * Norm|
|00001360| 20 29 20 2f 20 28 56 31 | 20 2b 20 49 6e 69 74 69 | ) / (V1| + Initi|
|00001370| 61 6c 56 6f 6c 2f 20 31 | 30 30 29 0d 2d 2d 70 75 |alVol/ 1|00).--pu|
|00001380| 74 20 22 5b 76 31 20 3c | 20 43 5d 20 48 3d 22 26 |t "[v1 <| C] H="&|
|00001390| 20 48 20 2d 2d 24 24 24 | 0d 20 20 20 20 20 20 20 | H --$$$|. |
|000013a0| 20 20 20 20 20 73 65 74 | 20 50 31 20 3d 20 30 2e | set| P1 = 0.|
|000013b0| 30 20 2b 20 20 20 2d 28 | 4c 6f 67 31 30 28 48 29 |0 + -(|Log10(H)|
|000013c0| 29 0d 20 20 20 20 20 20 | 20 20 65 6e 64 20 69 66 |). | end if|
|000013d0| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 65 6e 64 20 |. end| if.end |
|000013e0| 69 66 0d 69 66 20 50 31 | 20 3e 20 31 34 20 74 68 |if.if P1| > 14 th|
|000013f0| 65 6e 20 73 65 74 20 50 | 31 20 3d 20 31 33 2e 33 |en set P|1 = 13.3|
|00001400| 33 20 2d 2d 2a 2a 2a 20 | 62 75 67 20 73 63 72 65 |3 --*** |bug scre|
|00001410| 65 6e 65 72 20 2a 2a 2a | 0d 73 65 74 20 70 68 31 |ener ***|.set ph1|
|00001420| 30 30 20 3d 20 20 69 6e | 74 65 67 65 72 28 50 31 |00 = in|teger(P1|
|00001430| 20 2a 20 31 30 30 20 2b | 20 2e 35 29 0d 2d 2d 70 | * 100 +| .5).--p|
|00001440| 75 74 20 22 50 31 20 3d | 20 22 26 20 70 31 20 2d |ut "P1 =| "& p1 -|
|00001450| 2d 24 24 24 0d 2d 2d 20 | 36 2f 39 32 20 72 65 64 |-$$$.-- |6/92 red|
|00001460| 75 6e 64 65 6e 74 20 73 | 63 61 6c 69 6e 67 20 62 |undent s|caling b|
|00001470| 61 63 6b 20 74 6f 20 66 | 6c 6f 61 74 20 66 6f 72 |ack to f|loat for|
|00001480| 20 69 6e 20 6d 65 74 65 | 72 20 64 69 73 70 6c 61 | in mete|r displa|
|00001490| 79 20 73 68 6f 75 6c 64 | 20 62 65 20 65 6c 69 6d |y should| be elim|
|000014a0| 69 6e 61 74 65 64 0d 2d | 2d 20 73 69 6e 63 65 20 |inated.-|- since |
|000014b0| 50 48 20 78 6f 62 6a 65 | 63 74 20 69 73 20 70 72 |PH xobje|ct is pr|
|000014c0| 6f 70 65 72 6c 79 20 74 | 72 75 6e 63 61 74 69 6e |operly t|runcatin|
|000014d0| 67 20 74 68 65 20 76 61 | 6c 75 65 20 74 6f 20 32 |g the va|lue to 2|
|000014e0| 20 70 6f 69 6e 74 73 20 | 70 61 73 74 20 64 65 63 | points |past dec|
|000014f0| 69 6d 61 6c 3a 20 20 25 | 2e 32 66 0d 2d 2d 72 65 |imal: %|.2f.--re|
|00001500| 74 75 72 6e 20 50 31 20 | 20 20 2d 2d 20 73 63 61 |turn P1 | -- sca|
|00001510| 6c 65 20 70 68 20 74 6f | 20 69 6e 74 65 72 67 65 |le ph to| interge|
|00001520| 72 20 66 6f 72 6d 20 0d | 0d 0d 2d 2d 70 75 74 20 |r form .|..--put |
|00001530| 22 70 31 3d 20 22 26 20 | 70 31 20 2d 2d 24 24 24 |"p1= "& |p1 --$$$|
|00001540| 0d 2d 2d 2a 2a 2a 20 36 | 2f 39 32 20 20 20 6e 6f |.--*** 6|/92 no|
|00001550| 77 20 75 73 69 6e 67 20 | 66 6c 6f 61 74 69 6e 67 |w using |floating|
|00001560| 20 70 6f 69 6e 74 20 28 | 75 6e 73 63 61 6c 65 64 | point (|unscaled|
|00001570| 20 6c 6f 67 31 30 29 20 | 6f 6c 64 2e 2e 2e 0d 2d | log10) |old....-|
|00001580| 2d 2a 2a 2a 20 20 73 65 | 74 20 70 68 31 30 30 20 |-*** se|t ph100 |
|00001590| 3d 20 69 6e 74 65 67 65 | 72 28 50 31 20 2a 20 31 |= intege|r(P1 * 1|
|000015a0| 30 30 20 2b 20 2e 35 29 | 0d 0d 0d 6d 61 63 72 6f |00 + .5)|...macro|
|000015b0| 20 4c 6f 67 31 30 20 61 | 72 67 0d 67 6c 6f 62 61 | Log10 a|rg.globa|
|000015c0| 6c 20 4d 61 74 68 50 61 | 63 6b 61 67 65 2c 65 37 |l MathPa|ckage,e7|
|000015d0| 0d 2d 2d 2a 2a 2a 20 36 | 2f 39 32 3a 20 20 68 79 |.--*** 6|/92: hy|
|000015e0| 70 65 72 42 61 73 69 63 | 3a 20 6c 6f 67 28 29 20 |perBasic|: log() |
|000015f0| 20 62 6c 6f 77 73 20 75 | 70 20 6f 6e 20 71 75 61 | blows u|p on qua|
|00001600| 64 72 61 20 63 61 63 68 | 65 3f 0d 2d 2d 2a 2a 2a |dra cach|e?.--***|
|00001610| 20 66 75 6c 6c 20 73 74 | 72 69 6e 67 20 62 61 73 | full st|ring bas|
|00001620| 65 64 20 66 6c 6f 61 74 | 69 6e 67 20 70 6f 69 6e |ed float|ing poin|
|00001630| 74 20 58 6f 62 6a 20 70 | 61 63 6b 61 67 65 20 62 |t Xobj p|ackage b|
|00001640| 6f 6d 62 73 20 75 6e 64 | 65 72 20 70 6c 61 79 65 |ombs und|er playe|
|00001650| 72 20 6f 6e 6c 79 0d 2d | 2d 2a 2a 2a 20 69 4c 6f |r only.-|-*** iLo|
|00001660| 67 53 65 74 20 69 73 20 | 61 20 66 69 78 65 64 20 |gSet is |a fixed |
|00001670| 70 6f 69 6e 74 20 70 6c | 61 79 65 72 20 77 6f 72 |point pl|ayer wor|
|00001680| 6b 61 72 6f 75 6e 64 0d | 2d 2d 28 6f 6c 64 20 78 |karound.|--(old x|
|00001690| 66 63 6e 29 20 20 72 65 | 74 75 72 6e 20 6c 6f 67 |fcn) re|turn log|
|000016a0| 28 73 74 72 69 6e 67 28 | 61 72 67 29 29 20 2a 20 |(string(|arg)) * |
|000016b0| 2e 34 33 34 32 39 20 2d | 2d 20 4e 61 74 75 72 61 |.43429 -|- Natura|
|000016c0| 6c 20 74 6f 20 4c 6f 67 | 31 30 20 63 6f 6e 76 65 |l to Log|10 conve|
|000016d0| 72 73 69 6f 6e 20 66 61 | 63 74 6f 72 0d 73 65 74 |rsion fa|ctor.set|
|000016e0| 20 6c 6f 67 78 20 3d 20 | 4d 61 74 68 50 61 63 6b | logx = |MathPack|
|000016f0| 61 67 65 28 6d 69 4c 6f | 67 69 31 30 2c 20 69 6e |age(miLo|gi10, in|
|00001700| 74 65 67 65 72 28 61 72 | 67 20 2a 20 65 37 20 29 |teger(ar|g * e7 )|
|00001710| 29 20 2d 2d 20 73 63 61 | 6c 65 64 20 64 6f 77 6e |) -- sca|led down|
|00001720| 20 69 6e 74 65 72 67 65 | 72 20 69 6e 20 3f 0d 72 | interge|r in ?.r|
|00001730| 65 74 75 72 6e 20 30 2e | 30 20 2b 20 6c 6f 67 78 |eturn 0.|0 + logx|
|00001740| 20 2f 20 65 37 0d 0d 6d | 61 63 72 6f 20 44 75 6d | / e7..m|acro Dum|
|00001750| 70 50 48 20 2d 2d 20 70 | 72 6f 67 72 61 6d 6d 65 |pPH -- p|rogramme|
|00001760| 72 20 64 65 62 75 67 20 | 74 6f 6f 6c 0d 67 6c 6f |r debug |tool.glo|
|00001770| 62 61 6c 20 43 20 2c 48 | 2c 70 31 2c 76 31 2c 6e |bal C ,H|,p1,v1,n|
|00001780| 6f 72 6d 20 2d 2d 24 24 | 24 20 61 6c 6c 20 66 6f |orm --$$|$ all fo|
|00001790| 72 20 64 65 62 75 67 20 | 6f 6e 6c 79 0d 67 6c 6f |r debug |only.glo|
|000017a0| 62 61 6c 20 43 75 72 72 | 65 6e 74 56 6f 6c 75 6d |bal Curr|entVolum|
|000017b0| 65 2c 46 6c 61 73 6b 56 | 6f 6c 75 6d 65 2c 20 45 |e,FlaskV|olume, E|
|000017c0| 71 75 69 76 65 6c 61 6e | 63 65 5f 56 6f 6c 75 6d |quivelan|ce_Volum|
|000017d0| 65 2c 45 71 75 69 76 43 | 6f 75 6e 74 2c 45 51 57 |e,EquivC|ount,EQW|
|000017e0| 54 0d 67 6c 6f 62 61 6c | 20 42 75 72 65 74 4f 66 |T.global| BuretOf|
|000017f0| 66 73 65 74 2c 20 49 6e | 69 74 69 61 6c 56 6f 6c |fset, In|itialVol|
|00001800| 2c 70 68 31 30 30 2c 4d | 61 73 73 0d 0d 70 75 74 |,ph100,M|ass..put|
|00001810| 20 22 70 68 31 30 30 20 | 3d 22 26 70 68 31 30 30 | "ph100 |="&ph100|
|00001820| 0d 70 75 74 20 22 45 71 | 75 69 76 65 6c 61 6e 63 |.put "Eq|uivelanc|
|00001830| 65 5f 56 6f 6c 75 6d 65 | 3d 22 26 45 71 75 69 76 |e_Volume|="&Equiv|
|00001840| 65 6c 61 6e 63 65 5f 56 | 6f 6c 75 6d 65 0d 70 75 |elance_V|olume.pu|
|00001850| 74 20 22 49 6e 69 74 69 | 61 6c 56 6f 6c 2a 31 30 |t "Initi|alVol*10|
|00001860| 30 20 3d 22 26 49 6e 69 | 74 69 61 6c 56 6f 6c 0d |0 ="&Ini|tialVol.|
|00001870| 70 75 74 20 22 43 75 72 | 72 65 6e 74 56 6f 6c 75 |put "Cur|rentVolu|
|00001880| 6d 65 20 2a 20 31 30 30 | 20 3d 22 26 20 43 75 72 |me * 100| ="& Cur|
|00001890| 72 65 6e 74 56 6f 6c 75 | 6d 65 0d 70 75 74 20 22 |rentVolu|me.put "|
|000018a0| 56 31 3d 22 20 26 20 76 | 31 0d 70 75 74 20 22 45 |V1=" & v|1.put "E|
|000018b0| 71 75 69 76 43 6f 75 6e | 74 3d 22 26 45 71 75 69 |quivCoun|t="&Equi|
|000018c0| 76 43 6f 75 6e 74 0d 70 | 75 74 20 22 45 51 57 54 |vCount.p|ut "EQWT|
|000018d0| 3d 22 26 45 51 57 54 0d | 70 75 74 20 22 43 3d 22 |="&EQWT.|put "C="|
|000018e0| 20 26 20 43 0d 70 75 74 | 20 22 48 20 3d 20 22 26 | & C.put| "H = "&|
|000018f0| 48 0d 70 75 74 20 22 6d | 61 73 73 3d 22 20 26 20 |H.put "m|ass=" & |
|00001900| 6d 61 73 73 0d 70 75 74 | 20 22 4e 6f 72 6d 3d 22 |mass.put| "Norm="|
|00001910| 26 6e 6f 72 6d 0d 0d 6d | 61 63 72 6f 20 70 72 65 |&norm..m|acro pre|
|00001920| 64 69 63 74 45 50 20 2d | 2d 20 6e 6f 20 6c 6f 6e |dictEP -|- no lon|
|00001930| 67 65 72 20 75 73 65 64 | 0d 67 6c 6f 62 61 6c 20 |ger used|.global |
|00001940| 45 71 75 69 76 65 6c 61 | 6e 63 65 5f 56 6f 6c 75 |Equivela|nce_Volu|
|00001950| 6d 65 2c 45 71 75 69 76 | 43 6f 75 6e 74 2c 45 51 |me,Equiv|Count,EQ|
|00001960| 57 54 2c 6f 6c 64 4c 4f | 47 31 30 0d 2d 2d 25 25 |WT,oldLO|G10.--%%|
|00001970| 25 20 6f 6c 64 20 64 69 | 72 32 2e 30 20 20 73 65 |% old di|r2.0 se|
|00001980| 74 20 65 70 20 3d 20 76 | 61 6c 75 65 20 28 70 48 |t ep = v|alue (pH|
|00001990| 73 61 28 4d 61 73 73 2c | 33 36 34 35 2c 49 6e 69 |sa(Mass,|3645,Ini|
|000019a0| 74 69 61 6c 56 6f 6c 2c | 30 2c 31 30 30 30 2c 31 |tialVol,|0,1000,1|
|000019b0| 30 30 2c 22 65 70 22 29 | 29 0d 73 65 74 20 65 70 |00,"ep")|).set ep|
|000019c0| 20 3d 20 69 6e 74 65 67 | 65 72 28 20 45 71 75 69 | = integ|er( Equi|
|000019d0| 76 43 6f 75 6e 74 20 29 | 20 2d 2d 20 74 68 69 73 |vCount )| -- this|
|000019e0| 20 74 6f 20 62 65 20 73 | 63 61 6c 65 64 20 61 20 | to be s|caled a |
|000019f0| 6c 69 74 74 6c 65 0d 72 | 65 74 75 72 6e 20 65 70 |little.r|eturn ep|
|00001a00| 0d 0d 6d 61 63 72 6f 20 | 44 69 73 70 6c 61 79 70 |..macro |Displayp|
|00001a10| 48 31 30 30 20 2d 2d 20 | 6d 61 64 65 20 6f 62 73 |H100 -- |made obs|
|00001a20| 6f 6c 65 74 65 20 62 79 | 20 4d 71 74 68 20 58 43 |olete by| Mqth XC|
|00001a30| 4f 44 20 74 68 61 74 20 | 72 6f 75 6e 64 73 20 70 |OD that |rounds p|
|00001a40| 72 6f 70 65 72 6c 79 0d | 67 6c 6f 62 61 6c 20 70 |roperly.|global p|
|00001a50| 68 31 30 30 0d 73 65 74 | 20 70 68 73 20 3d 20 73 |h100.set| phs = s|
|00001a60| 74 72 69 6e 67 20 28 70 | 68 31 30 30 29 0d 73 65 |tring (p|h100).se|
|00001a70| 74 20 70 6c 20 3d 20 6c | 65 6e 67 74 68 28 70 68 |t pl = l|ength(ph|
|00001a80| 73 29 0d 73 65 74 20 70 | 68 53 54 52 20 3d 20 73 |s).set p|hSTR = s|
|00001a90| 74 72 69 6e 67 28 70 68 | 31 30 30 2f 20 31 30 30 |tring(ph|100/ 100|
|00001aa0| 29 20 26 20 22 2e 22 20 | 26 20 63 68 61 72 73 28 |) & "." |& chars(|
|00001ab0| 70 68 73 2c 70 6c 20 2d | 20 31 2c 70 6c 20 29 20 |phs,pl -| 1,pl ) |
|00001ac0| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|00001ad0| 20 63 61 73 74 20 64 35 | 32 20 3d 20 70 68 53 54 | cast d5|2 = phST|
|00001ae0| 52 0d 0d 6d 61 63 72 6f | 20 44 65 76 31 30 30 20 |R..macro| Dev100 |
|00001af0| 61 4e 75 6d 0d 73 65 74 | 20 70 68 73 20 3d 20 73 |aNum.set| phs = s|
|00001b00| 74 72 69 6e 67 20 28 61 | 4e 75 6d 29 0d 73 65 74 |tring (a|Num).set|
|00001b10| 20 70 6c 20 3d 20 6c 65 | 6e 67 74 68 28 70 68 73 | pl = le|ngth(phs|
|00001b20| 29 0d 72 65 74 75 72 6e | 20 73 74 72 69 6e 67 28 |).return| string(|
|00001b30| 61 4e 75 6d 20 2f 20 31 | 30 30 20 29 20 26 20 22 |aNum / 1|00 ) & "|
|00001b40| 2e 22 20 26 20 63 68 61 | 72 73 28 70 68 73 2c 70 |." & cha|rs(phs,p|
|00001b50| 6c 20 2d 20 31 2c 70 6c | 20 29 20 0d 0d 6d 61 63 |l - 1,pl| ) ..mac|
|00001b60| 72 6f 20 52 65 50 6c 6f | 74 50 48 43 75 72 76 65 |ro RePlo|tPHCurve|
|00001b70| 0d 2d 2d 20 73 70 72 69 | 74 65 73 20 33 2c 35 2c |.-- spri|tes 3,5,|
|00001b80| 31 32 2c 31 37 20 6d 75 | 73 74 20 62 65 20 64 65 |12,17 mu|st be de|
|00001b90| 70 75 70 70 65 74 65 64 | 0d 67 6c 6f 62 61 6c 20 |puppeted|.global |
|00001ba0| 50 48 73 65 72 69 65 73 | 52 65 63 6f 72 64 2c 56 |PHseries|Record,V|
|00001bb0| 6f 6c 53 65 72 69 65 73 | 52 65 63 6f 72 64 2c 50 |olSeries|Record,P|
|00001bc0| 48 70 6f 69 6e 74 73 2c | 70 68 31 30 30 2c 43 75 |Hpoints,|ph100,Cu|
|00001bd0| 72 72 65 6e 74 56 6f 6c | 75 6d 65 0d 67 6c 6f 62 |rrentVol|ume.glob|
|00001be0| 61 6c 20 50 72 65 76 70 | 48 78 2c 50 72 65 76 70 |al Prevp|Hx,Prevp|
|00001bf0| 48 79 20 2d 2d 20 73 65 | 65 64 20 70 6c 6f 74 70 |Hy -- se|ed plotp|
|00001c00| 48 20 61 70 70 72 6f 78 | 2e 20 73 74 61 72 74 69 |H approx|. starti|
|00001c10| 6e 67 20 70 6f 69 6e 74 | 20 74 6f 20 6f 72 67 20 |ng point| to org |
|00001c20| 70 6f 69 6e 74 0d 2d 2d | 20 28 20 73 68 6f 75 64 |point.--| ( shoud|
|00001c30| 20 63 61 70 74 75 72 65 | 20 72 65 61 6c 20 6f 6e | capture| real on|
|00001c40| 65 29 20 20 0d 73 65 74 | 20 50 72 65 76 70 48 78 |e) .set| PrevpHx|
|00001c50| 20 3d 20 20 34 35 0d 73 | 65 74 20 20 50 72 65 76 | = 45.s|et Prev|
|00001c60| 70 48 79 20 3d 20 32 36 | 33 0d 0d 73 65 74 20 74 |pHy = 26|3..set t|
|00001c70| 68 65 20 70 75 70 70 65 | 74 20 6f 66 20 73 70 72 |he puppe|t of spr|
|00001c80| 69 74 65 20 39 20 74 6f | 20 74 72 75 65 20 2d 2d |ite 9 to| true --|
|00001c90| 20 74 68 65 20 70 6f 69 | 6e 74 0d 73 65 74 20 74 | the poi|nt.set t|
|00001ca0| 68 65 20 66 6f 72 65 43 | 6f 6c 6f 72 20 6f 66 20 |he foreC|olor of |
|00001cb0| 73 70 72 69 74 65 20 20 | 39 20 74 6f 20 32 31 30 |sprite |9 to 210|
|00001cc0| 20 2d 2d 20 62 6c 75 65 | 0d 73 65 74 20 74 68 65 | -- blue|.set the|
|00001cd0| 20 70 75 70 70 65 74 20 | 6f 66 20 73 70 72 69 74 | puppet |of sprit|
|00001ce0| 65 20 31 30 20 74 6f 20 | 74 72 75 65 20 2d 2d 20 |e 10 to |true -- |
|00001cf0| 74 68 65 20 72 65 63 74 | 0d 73 65 74 20 74 68 65 |the rect|.set the|
|00001d00| 20 66 6f 72 65 43 6f 6c | 6f 72 20 6f 66 20 73 70 | foreCol|or of sp|
|00001d10| 72 69 74 65 20 20 31 30 | 20 74 6f 20 32 31 30 20 |rite 10| to 210 |
|00001d20| 2d 2d 20 62 6c 75 65 0d | 2d 2d 20 6e 65 65 64 20 |-- blue.|-- need |
|00001d30| 74 6f 20 69 6e 69 74 20 | 70 72 65 76 69 6f 75 73 |to init |previous|
|00001d40| 65 20 78 2e 79 20 76 61 | 6c 75 65 73 20 66 6f 72 |e x.y va|lues for|
|00001d50| 20 6c 69 6e 65 20 74 6f | 20 6c 6f 6f 6b 20 67 6f | line to| look go|
|00001d60| 6f 64 0d 72 65 70 65 61 | 74 20 77 69 74 68 20 69 |od.repea|t with i|
|00001d70| 20 3d 20 31 20 74 6f 20 | 50 48 70 6f 69 6e 74 73 | = 1 to |PHpoints|
|00001d80| 0d 20 20 20 20 73 65 74 | 20 70 68 31 30 30 20 3d |. set| ph100 =|
|00001d90| 20 50 48 73 65 72 69 65 | 73 52 65 63 6f 72 64 28 | PHserie|sRecord(|
|00001da0| 6d 67 65 74 2c 69 29 20 | 2d 2d 20 73 74 6f 72 65 |mget,i) |-- store|
|00001db0| 20 66 6f 72 20 72 65 70 | 6c 6f 74 20 6c 61 74 65 | for rep|lot late|
|00001dc0| 72 0d 20 20 20 73 65 74 | 20 43 75 72 72 65 6e 74 |r. set| Current|
|00001dd0| 56 6f 6c 75 6d 65 20 3d | 20 20 56 6f 6c 53 65 72 |Volume =| VolSer|
|00001de0| 69 65 73 52 65 63 6f 72 | 64 28 6d 67 65 74 2c 69 |iesRecor|d(mget,i|
|00001df0| 29 0d 70 75 74 20 22 70 | 68 31 30 30 2c 43 75 72 |).put "p|h100,Cur|
|00001e00| 72 65 6e 74 56 6f 6c 75 | 6d 65 3a 20 22 26 20 70 |rentVolu|me: "& p|
|00001e10| 68 31 30 30 26 22 20 2c | 20 22 26 20 43 75 72 72 |h100&" ,| "& Curr|
|00001e20| 65 6e 74 56 6f 6c 75 6d | 65 20 2d 2d 24 24 24 0d |entVolum|e --$$$.|
|00001e30| 70 6c 6f 74 70 48 0d 75 | 70 64 61 74 65 53 74 61 |plotpH.u|pdateSta|
|00001e40| 67 65 0d 65 6e 64 20 72 | 65 70 65 61 74 0d 0d 6d |ge.end r|epeat..m|
|00001e50| 61 63 72 6f 20 50 6c 6f | 74 70 48 0d 67 6c 6f 62 |acro Plo|tpH.glob|
|00001e60| 61 6c 20 50 72 65 76 70 | 48 78 2c 50 72 65 76 70 |al Prevp|Hx,Prevp|
|00001e70| 48 79 2c 49 6e 69 74 69 | 61 6c 56 6f 6c 2c 43 75 |Hy,Initi|alVol,Cu|
|00001e80| 72 72 65 6e 74 56 6f 6c | 75 6d 65 2c 70 68 31 30 |rrentVol|ume,ph10|
|00001e90| 30 2c 42 75 72 65 74 4f | 66 66 73 65 74 0d 2d 2d |0,BuretO|ffset.--|
|00001ea0| 70 75 74 20 22 50 6c 6f | 74 70 48 20 3d 20 22 26 |put "Plo|tpH = "&|
|00001eb0| 20 70 68 31 30 30 2d 2d | 24 24 24 0d 0d 73 65 74 | ph100--|$$$..set|
|00001ec0| 20 78 20 3d 20 69 6e 74 | 65 67 65 72 28 28 43 75 | x = int|eger((Cu|
|00001ed0| 72 72 65 6e 74 56 6f 6c | 75 6d 65 20 2d 20 42 75 |rrentVol|ume - Bu|
|00001ee0| 72 65 74 4f 66 66 73 65 | 74 29 20 2a 20 37 20 2f |retOffse|t) * 7 /|
|00001ef0| 20 31 30 30 20 2b 20 74 | 68 65 20 6c 65 66 74 20 | 100 + t|he left |
|00001f00| 6f 66 20 73 70 72 69 74 | 65 20 38 20 2b 20 33 36 |of sprit|e 8 + 36|
|00001f10| 29 0d 73 65 74 20 79 20 | 3d 20 69 6e 74 65 67 65 |).set y |= intege|
|00001f20| 72 28 74 68 65 20 62 6f | 74 74 6f 6d 20 6f 66 20 |r(the bo|ttom of |
|00001f30| 73 70 72 69 74 65 20 38 | 20 2d 20 33 34 20 2d 20 |sprite 8| - 34 - |
|00001f40| 28 20 70 68 31 30 30 2a | 20 31 35 2f 20 31 30 30 |( ph100*| 15/ 100|
|00001f50| 20 29 29 0d 73 65 74 20 | 74 68 65 20 6c 6f 63 48 | )).set |the locH|
|00001f60| 20 6f 66 20 73 70 72 69 | 74 65 20 39 20 3d 20 78 | of spri|te 9 = x|
|00001f70| 20 2d 2d 20 70 6c 6f 74 | 20 70 6f 69 6e 74 0d 2d | -- plot| point.-|
|00001f80| 2d 70 75 74 20 79 20 2d | 2d 24 24 24 0d 73 65 74 |-put y -|-$$$.set|
|00001f90| 20 74 68 65 20 6c 6f 63 | 56 20 6f 66 20 73 70 72 | the loc|V of spr|
|00001fa0| 69 74 65 20 39 20 3d 20 | 79 0d 2d 2d 70 75 74 20 |ite 9 = |y.--put |
|00001fb0| 22 58 2c 59 3d 20 22 26 | 20 78 20 26 22 2c 20 22 |"X,Y= "&| x &", "|
|00001fc0| 26 20 79 20 2d 2d 24 24 | 24 0d 73 65 74 20 78 32 |& y --$$|$.set x2|
|00001fd0| 20 3d 20 78 0d 73 65 74 | 20 79 32 20 3d 20 79 0d | = x.set| y2 = y.|
|00001fe0| 69 66 20 78 20 3c 3d 20 | 50 72 65 76 70 48 78 20 |if x <= |PrevpHx |
|00001ff0| 74 68 65 6e 20 73 65 74 | 20 78 32 20 3d 20 50 72 |then set| x2 = Pr|
|00002000| 65 76 70 48 78 20 2b 20 | 31 20 2d 2d 20 62 6f 78 |evpHx + |1 -- box|
|00002010| 20 61 74 20 6c 65 61 73 | 74 20 31 20 6c 69 6e 65 | at leas|t 1 line|
|00002020| 20 74 68 69 63 6b 6e 65 | 73 73 20 77 69 64 65 0d | thickne|ss wide.|
|00002030| 69 66 20 79 20 3d 20 50 | 72 65 76 70 48 79 20 74 |if y = P|revpHy t|
|00002040| 68 65 6e 20 73 65 74 20 | 79 32 20 3d 20 50 72 65 |hen set |y2 = Pre|
|00002050| 76 70 48 79 20 2b 20 31 | 0d 2d 2d 73 65 74 20 74 |vpHy + 1|.--set t|
|00002060| 68 65 20 74 79 70 65 20 | 6f 66 20 73 70 72 69 74 |he type |of sprit|
|00002070| 65 20 31 30 20 3d 20 35 | 20 2d 2d 20 54 6f 70 4c |e 10 = 5| -- TopL|
|00002080| 2d 42 6f 74 52 0d 2d 2d | 65 6c 73 65 20 73 65 74 |-BotR.--|else set|
|00002090| 20 74 68 65 20 74 79 70 | 65 20 6f 66 20 73 70 72 | the typ|e of spr|
|000020a0| 69 74 65 20 31 30 20 3d | 20 36 20 2d 2d 20 62 6f |ite 10 =| 6 -- bo|
|000020b0| 74 74 6f 6d 4c 65 66 74 | 2d 54 6f 70 52 69 67 68 |ttomLeft|-TopRigh|
|000020c0| 74 20 6c 69 6e 65 0d 0d | 73 70 72 69 74 65 42 6f |t line..|spriteBo|
|000020d0| 78 20 31 30 2c 20 50 72 | 65 76 70 48 78 2c 20 79 |x 10, Pr|evpHx, y|
|000020e0| 32 2c 20 78 32 2c 20 50 | 72 65 76 70 48 79 20 2d |2, x2, P|revpHy -|
|000020f0| 2d 20 61 6a 6f 69 6e 69 | 6e 67 20 63 75 72 76 65 |- ajoini|ng curve|
|00002100| 20 73 65 67 6d 65 6e 74 | 0d 73 65 74 20 74 68 65 | segment|.set the|
|00002110| 20 74 79 70 65 20 6f 66 | 20 73 70 72 69 74 65 20 | type of| sprite |
|00002120| 31 30 20 3d 20 36 2d 2d | 20 36 20 42 6f 74 4c 2d |10 = 6--| 6 BotL-|
|00002130| 54 6f 70 52 20 66 6f 72 | 20 61 73 63 65 6e 64 69 |TopR for| ascendi|
|00002140| 6e 67 20 70 6c 6f 74 73 | 0d 73 65 74 20 50 72 65 |ng plots|.set Pre|
|00002150| 76 70 48 78 20 3d 20 78 | 20 2d 2d 20 73 74 61 72 |vpHx = x| -- star|
|00002160| 74 20 6f 66 20 6e 65 78 | 74 20 6c 69 6e 65 20 73 |t of nex|t line s|
|00002170| 65 67 6d 65 6e 74 0d 73 | 65 74 20 50 72 65 76 70 |egment.s|et Prevp|
|00002180| 48 79 20 3d 20 79 0d 0d | 6d 61 63 72 6f 20 69 64 |Hy = y..|macro id|
|00002190| 6c 65 4c 6f 6f 70 42 61 | 63 6b 0d 67 6c 6f 62 61 |leLoopBa|ck.globa|
|000021a0| 6c 20 44 65 6c 61 79 65 | 64 43 6c 69 63 6b 56 0d |l Delaye|dClickV.|
|000021b0| 69 66 20 44 65 6c 61 79 | 65 64 43 6c 69 63 6b 56 |if Delay|edClickV|
|000021c0| 20 3c 3e 20 30 20 74 68 | 65 6e 20 48 61 6e 64 6c | <> 0 th|en Handl|
|000021d0| 65 42 74 6e 43 6c 69 63 | 6b 20 44 65 6c 61 79 65 |eBtnClic|k Delaye|
|000021e0| 64 43 6c 69 63 6b 56 20 | 2d 2d 20 62 75 73 79 20 |dClickV |-- busy |
|000021f0| 75 73 65 72 20 63 6c 69 | 63 6b 65 64 20 0d 65 6c |user cli|cked .el|
|00002200| 73 65 20 67 6f 20 74 6f | 20 6d 61 72 6b 65 72 28 |se go to| marker(|
|00002210| 30 29 0d 0d 6d 61 63 72 | 6f 20 43 6f 6e 74 72 6f |0)..macr|o Contro|
|00002220| 6c 43 6c 69 63 6b 20 0d | 48 61 6e 64 6c 65 42 74 |lClick .|HandleBt|
|00002230| 6e 43 6c 69 63 6b 20 74 | 68 65 20 6d 6f 75 73 65 |nClick t|he mouse|
|00002240| 56 0d 0d 6d 61 63 72 6f | 20 44 65 6c 61 79 65 64 |V..macro| Delayed|
|00002250| 43 6f 6e 74 72 6f 6c 43 | 6c 69 63 6b 20 2d 2d 20 |ControlC|lick -- |
|00002260| 75 73 65 72 20 63 6c 69 | 63 6b 20 77 68 69 6c 65 |user cli|ck while|
|00002270| 20 66 6c 6f 77 69 6e 67 | 20 2d 2d 20 32 2f 39 32 | flowing| -- 2/92|
|00002280| 0d 67 6c 6f 62 61 6c 20 | 44 65 6c 61 79 65 64 43 |.global |DelayedC|
|00002290| 6c 69 63 6b 56 20 2d 2d | 20 69 66 20 6e 6f 6e 2d |lickV --| if non-|
|000022a0| 7a 65 72 6f 20 77 69 6c | 6c 20 62 65 20 69 6e 76 |zero wil|l be inv|
|000022b0| 6f 6b 65 64 20 6c 61 74 | 65 72 0d 73 65 74 20 44 |oked lat|er.set D|
|000022c0| 65 6c 61 79 65 64 43 6c | 69 63 6b 56 20 3d 20 74 |elayedCl|ickV = t|
|000022d0| 68 65 20 6d 6f 75 73 65 | 56 0d 2d 2d 70 75 74 20 |he mouse|V.--put |
|000022e0| 22 44 65 6c 61 79 65 64 | 20 63 6c 69 63 6b 20 40 |"Delayed| click @|
|000022f0| 20 76 3d 22 26 20 44 65 | 6c 61 79 65 64 43 6c 69 | v="& De|layedCli|
|00002300| 63 6b 56 20 2d 2d 24 24 | 24 0d 0d 6d 61 63 72 6f |ckV --$$|$..macro|
|00002310| 20 48 61 6e 64 6c 65 42 | 74 6e 43 6c 69 63 6b 20 | HandleB|tnClick |
|00002320| 20 43 6c 69 63 6b 56 0d | 67 6c 6f 62 61 6c 20 44 | ClickV.|global D|
|00002330| 65 6c 61 79 65 64 43 6c | 69 63 6b 56 2c 4d 6f 64 |elayedCl|ickV,Mod|
|00002340| 65 54 6f 6b 65 6e 0d 73 | 65 74 20 44 65 6c 61 79 |eToken.s|et Delay|
|00002350| 65 64 43 6c 69 63 6b 56 | 20 3d 20 30 0d 73 65 74 |edClickV| = 0.set|
|00002360| 20 51 72 74 72 48 74 20 | 3d 20 74 68 65 20 68 65 | QrtrHt |= the he|
|00002370| 69 67 68 74 20 6f 66 20 | 73 70 72 69 74 65 20 31 |ight of |sprite 1|
|00002380| 39 20 2f 20 34 0d 2d 2d | 20 64 6f 65 73 6e 74 20 |9 / 4.--| doesnt |
|00002390| 74 65 73 74 20 66 6f 72 | 20 73 75 64 64 65 6e 20 |test for| sudden |
|000023a0| 6d 6f 76 65 20 75 70 0d | 73 65 74 20 44 6f 77 6e |move up.|set Down|
|000023b0| 50 69 78 65 6c 73 20 3d | 20 28 43 6c 69 63 6b 56 |Pixels =| (ClickV|
|000023c0| 20 2d 20 74 68 65 20 74 | 6f 70 20 6f 66 20 73 70 | - the t|op of sp|
|000023d0| 72 69 74 65 20 31 39 29 | 0d 73 65 74 20 42 74 6e |rite 19)|.set Btn|
|000023e0| 4e 75 6d 20 3d 20 44 6f | 77 6e 50 69 78 65 6c 73 |Num = Do|wnPixels|
|000023f0| 20 2f 20 51 72 74 72 48 | 74 20 2b 20 31 20 0d 69 | / QrtrH|t + 1 .i|
|00002400| 66 20 44 6f 77 6e 50 69 | 78 65 6c 73 20 3c 20 30 |f DownPi|xels < 0|
|00002410| 20 74 68 65 6e 20 73 65 | 74 20 42 74 6e 4e 75 6d | then se|t BtnNum|
|00002420| 20 3d 20 30 20 2d 2d 20 | 62 72 69 65 66 20 76 61 | = 0 -- |brief va|
|00002430| 6c 69 64 69 74 79 20 74 | 65 73 74 20 28 20 63 6f |lidity t|est ( co|
|00002440| 75 6c 64 20 62 65 20 62 | 65 74 74 65 72 29 0d 69 |uld be b|etter).i|
|00002450| 66 20 42 74 6e 4e 75 6d | 20 3d 20 31 20 74 68 65 |f BtnNum| = 1 the|
|00002460| 6e 0d 20 20 20 20 53 74 | 61 72 74 66 43 6f 6e 74 |n. St|artfCont|
|00002470| 69 6e 6f 75 73 20 20 2d | 2d 20 66 61 73 74 20 63 |inous -|- fast c|
|00002480| 6f 6e 74 69 6e 6f 75 73 | 2c 20 31 35 30 20 72 61 |ontinous|, 150 ra|
|00002490| 74 65 0d 65 6c 73 65 0d | 20 20 20 20 69 66 20 42 |te.else.| if B|
|000024a0| 74 6e 4e 75 6d 20 3d 20 | 32 20 74 68 65 6e 0d 20 |tnNum = |2 then. |
|000024b0| 20 20 20 20 20 20 20 53 | 74 61 72 74 73 43 6f 6e | S|tartsCon|
|000024c0| 74 69 6e 6f 75 73 20 20 | 2d 2d 20 73 6c 6f 77 20 |tinous |-- slow |
|000024d0| 63 6f 6e 74 69 6e 6f 75 | 73 2c 20 35 30 20 72 61 |continou|s, 50 ra|
|000024e0| 74 65 0d 20 20 20 20 65 | 6c 73 65 0d 20 20 20 20 |te. e|lse. |
|000024f0| 20 20 20 20 69 66 20 42 | 74 6e 4e 75 6d 20 3d 20 | if B|tnNum = |
|00002500| 33 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 20 |3 then. | |
|00002510| 20 20 20 47 6f 53 75 62 | 46 72 61 6d 65 20 22 44 | GoSub|Frame "D|
|00002520| 72 6f 70 5f 4f 6e 65 22 | 20 26 20 4d 6f 64 65 54 |rop_One"| & ModeT|
|00002530| 6f 6b 65 6e 0d 20 20 20 | 20 20 20 20 20 65 6c 73 |oken. | els|
|00002540| 65 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 69 66 |e. | if|
|00002550| 20 42 74 6e 4e 75 6d 20 | 3d 20 34 20 74 68 65 6e | BtnNum |= 4 then|
|00002560| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00002570| 20 47 6f 53 75 62 46 72 | 61 6d 65 20 22 53 70 6c | GoSubFr|ame "Spl|
|00002580| 69 74 5f 44 72 6f 70 22 | 20 26 20 4d 6f 64 65 54 |it_Drop"| & ModeT|
|00002590| 6f 6b 65 6e 0d 20 20 20 | 20 20 20 20 20 20 20 20 |oken. | |
|000025a0| 20 2d 2d 20 75 73 65 72 | 20 6d 61 79 20 68 61 76 | -- user| may hav|
|000025b0| 65 64 20 6d 6f 76 65 64 | 20 6f 66 66 20 62 74 6e |ed moved| off btn|
|000025c0| 2c 20 6d 61 79 20 6e 6f | 74 20 62 65 20 3e 3d 31 |, may no|t be >=1|
|000025d0| 20 3c 3d 20 34 0d 20 20 | 20 20 20 20 20 20 20 20 | <= 4. | |
|000025e0| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 20 20 20 | end if|. |
|000025f0| 20 65 6e 64 20 69 66 0d | 20 20 20 20 65 6e 64 20 | end if.| end |
|00002600| 69 66 0d 65 6e 64 20 69 | 66 0d 0d 0d 66 61 63 74 |if.end i|f...fact|
|00002610| 6f 72 79 20 41 72 72 61 | 79 4d 61 6b 65 72 0d 6d |ory Arra|yMaker.m|
|00002620| 65 74 68 6f 64 20 6d 6e | 65 77 00 15 00 00 00 00 |ethod mn|ew......|
|00002630| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00002640| 00 00 04 2a 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...*....|........|
|00002650| 00 00 00 00 00 00 04 30 | 00 10 00 0c 00 03 00 00 |.......0|........|
|00002660| 00 0c 00 00 00 00 00 00 | 00 00 07 88 00 0c 00 0a |........|........|
|00002670| 00 03 00 00 00 09 00 00 | 00 00 00 00 00 00 08 71 |........|.......q|
|00002680| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00002690| 00 00 08 a0 00 0c 00 0a | 00 03 00 00 00 09 00 00 |........|........|
|000026a0| 00 00 00 00 00 00 08 aa | 00 10 00 0c 00 03 00 00 |........|........|
|000026b0| 00 0c 00 00 00 00 00 00 | 00 00 0f 6f 00 0c 00 0a |........|...o....|
|000026c0| 00 03 00 00 00 09 00 00 | 00 00 00 00 00 00 0f 70 |........|.......p|
|000026d0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000026e0| 00 00 13 36 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...6....|........|
|000026f0| 00 00 00 00 00 00 13 44 | 00 10 00 0c 00 03 00 00 |.......D|........|
|00002700| 00 0c 00 00 00 00 00 00 | 00 00 16 28 00 10 00 0c |........|...(....|
|00002710| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 16 2e |........|........|
|00002720| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00002730| 00 00 19 61 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...a....|........|
|00002740| 00 00 00 00 00 00 19 6d | 00 10 00 0c 00 03 00 00 |.......m|........|
|00002750| 00 0c 00 00 00 00 00 00 | 00 00 19 ed 00 10 00 0c |........|........|
|00002760| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 19 f9 |........|........|
|00002770| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00002780| 00 00 1a 1c 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00002790| 00 00 00 00 00 00 1a 2f | 00 10 00 0c 00 03 00 00 |......./|........|
|000027a0| 00 0c 00 00 00 00 00 00 | 00 00 1a e4 00 10 00 0c |........|........|
|000027b0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 1a f2 |........|........|
|000027c0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|000027d0| 00 00 01 e8 00 00 00 0c | 00 00 01 8a 00 00 00 52 |........|.......R|
|000027e0| 20 20 4f 62 6a 65 63 74 | 69 76 65 3a 20 44 65 74 | Object|ive: Det|
|000027f0| 65 72 6d 69 6e 65 20 74 | 68 65 20 76 6f 6c 75 6d |ermine t|he volum|
|00002800| 65 20 6f 66 20 61 64 64 | 65 64 20 74 69 74 72 61 |e of add|ed titra|
|00002810| 6e 74 20 28 66 72 6f 6d | 20 74 68 65 20 62 75 72 |nt (from| the bur|
|00002820| 65 74 29 20 72 65 71 75 | 69 72 65 64 20 74 6f 20 |et) requ|ired to |
|00002830| 72 65 61 63 68 20 74 68 | 65 20 65 6e 64 70 6f 69 |reach th|e endpoi|
|00002840| 6e 74 2e 20 20 54 68 69 | 73 20 74 61 72 67 65 74 |nt. Thi|s target|
|00002850| 20 70 6f 69 6e 74 20 69 | 73 20 69 6e 64 69 63 61 | point i|s indica|
|00002860| 74 65 64 20 62 79 20 74 | 68 65 20 63 6f 6c 6f 72 |ted by t|he color|
|00002870| 20 73 68 6f 77 6e 20 69 | 6e 20 74 68 65 20 22 70 | shown i|n the "p|
|00002880| 48 3d 35 22 20 73 61 6d | 70 6c 65 20 66 6c 61 73 |H=5" sam|ple flas|
|00002890| 6b 2e 20 54 68 65 20 22 | 70 48 3e 37 22 20 20 63 |k. The "|pH>7" c|
|000028a0| 6f 6c 6f 72 20 20 69 6e | 64 69 63 61 74 65 73 20 |olor in|dicates |
|000028b0| 79 6f 75 27 76 65 20 67 | 6f 6e 65 20 70 61 73 74 |you've g|one past|
|000028c0| 20 74 68 65 20 65 6e 64 | 20 70 6f 69 6e 74 2e 0d | the end| point..|
|000028d0| 20 20 20 20 55 73 65 20 | 74 68 65 20 46 61 73 74 | Use |the Fast|
|000028e0| 2f 53 6c 6f 77 20 66 6c | 6f 77 20 63 6f 6e 74 72 |/Slow fl|ow contr|
|000028f0| 6f 6c 20 62 75 74 74 6f | 6e 73 20 74 6f 20 61 64 |ol butto|ns to ad|
|00002900| 64 20 74 69 74 72 61 6e | 74 20 20 66 72 6f 6d 20 |d titran|t from |
|00002910| 74 68 65 20 62 75 72 65 | 74 20 28 48 6f 6c 64 20 |the bure|t (Hold |
|00002920| 66 6f 72 20 63 6f 6e 74 | 69 6e 6f 75 73 20 66 6c |for cont|inous fl|
|00002930| 6f 77 29 2e 20 4e 65 61 | 72 20 74 68 65 20 65 6e |ow). Nea|r the en|
|00002940| 64 20 70 6f 69 6e 74 2c | 20 75 73 65 20 74 68 65 |d point,| use the|
|00002950| 20 57 68 6f 6c 65 2f 53 | 70 6c 69 74 20 64 72 6f | Whole/S|plit dro|
|00002960| 70 20 62 75 74 74 6f 6e | 73 2e 00 04 00 00 00 00 |p button|s.......|
|00002970| 00 0f 00 0b 00 0e 01 00 | 00 0e 00 00 00 00 66 66 |........|......ff|
|00002980| 00 00 00 02 00 10 00 0b | 00 c1 01 00 00 0c 00 00 |........|........|
|00002990| 00 00 66 66 00 00 01 22 | 00 10 00 0b 00 c1 03 00 |..ff..."|........|
|000029a0| 00 0c 00 00 00 00 66 66 | 00 00 01 2a 00 10 00 0b |......ff|...*....|
|000029b0| 00 c1 01 00 00 0c 00 00 | 00 00 66 66 00 00 00 ac |........|..ff....|
|000029c0| 00 00 00 0c 00 00 00 62 | 00 00 00 3e 4e 6f 74 65 |.......b|...>Note|
|000029d0| 3a 20 54 68 65 20 76 61 | 72 69 61 74 69 6f 6e 20 |: The va|riation |
|000029e0| 6f 66 20 70 48 20 77 74 | 68 20 74 68 65 20 76 6f |of pH wt|h the vo|
|000029f0| 6c 75 6d 65 20 6f 66 20 | 74 69 74 72 61 6e 74 20 |lume of |titrant |
|00002a00| 61 64 64 65 64 20 77 69 | 6c 6c 20 62 65 20 61 76 |added wi|ll be av|
|00002a10| 61 69 6c 61 62 6c 65 20 | 69 6e 20 73 65 6c 65 63 |ailable |in selec|
|00002a20| 74 65 64 20 65 78 65 72 | 63 69 73 65 73 2e 00 03 |ted exer|cises...|
|00002a30| 00 00 00 00 00 10 00 0b | 00 c1 00 00 00 0c 00 00 |........|........|
|00002a40| 00 00 99 99 00 00 00 3e | 00 0d 00 0a 00 c1 00 00 |.......>|........|
|00002a50| 00 0a 00 00 00 00 99 99 | 00 00 00 3f 00 10 00 0b |........|...?....|
|00002a60| 00 c1 00 00 00 0c 00 00 | 00 00 99 99 00 00 25 b8 |........|......%.|
|00002a70| 00 00 00 0c 00 00 23 66 | 00 00 02 46 2d 2d 20 6f |......#f|...F-- o|
|00002a80| 6c 64 20 6c 6f 67 20 62 | 6f 6f 6b 20 64 69 72 20 |ld log b|ook dir |
|00002a90| 32 2e 30 20 63 6f 64 65 | 2e 2e 2e 75 70 64 61 74 |2.0 code|...updat|
|00002aa0| 65 0d 6d 61 63 72 6f 20 | 4c 6f 67 54 61 62 6c 65 |e.macro |LogTable|
|00002ab0| 53 65 74 55 70 0d 2d 2d | 20 61 72 72 61 79 73 20 |SetUp.--| arrays |
|00002ac0| 66 72 6f 6d 20 77 68 69 | 63 68 20 64 69 73 70 6c |from whi|ch displ|
|00002ad0| 61 79 20 74 61 62 6c 65 | 20 61 6e 64 20 63 61 6c |ay table| and cal|
|00002ae0| 63 75 6c 61 74 69 6f 6e | 73 20 61 72 65 20 6d 61 |culation|s are ma|
|00002af0| 64 65 2e 20 45 6c 65 6d | 65 6e 74 23 20 75 73 65 |de. Elem|ent# use|
|00002b00| 0d 2d 2d 20 31 20 3d 20 | 4d 61 73 73 20 4b 48 50 |.-- 1 = |Mass KHP|
|00002b10| 2c 20 32 20 3d 20 46 69 | 6e 61 6c 20 56 6f 6c 2e |, 2 = Fi|nal Vol.|
|00002b20| 2c 20 33 20 3d 20 69 6e | 69 74 69 61 6c 20 56 6f |, 3 = in|itial Vo|
|00002b30| 6c 2e 2c 20 34 20 3d 20 | 56 6f 6c 20 54 69 74 72 |l., 4 = |Vol Titr|
|00002b40| 61 6e 74 2c 20 35 20 3d | 20 4d 6f 6c 61 72 69 74 |ant, 5 =| Molarit|
|00002b50| 79 0d 2d 2d 20 65 6c 65 | 6d 65 6e 74 20 36 20 2d |y.-- ele|ment 6 -|
|00002b60| 20 31 30 20 73 74 6f 72 | 65 20 66 6c 6f 61 74 69 | 10 stor|e floati|
|00002b70| 6e 67 20 70 6f 69 6e 74 | 20 73 74 72 69 6e 67 20 |ng point| string |
|00002b80| 76 65 72 73 69 6f 6e 73 | 0d 67 6c 6f 62 61 6c 20 |versions|.global |
|00002b90| 54 72 69 61 6c 31 2c 54 | 72 69 61 6c 32 2c 54 72 |Trial1,T|rial2,Tr|
|00002ba0| 69 61 6c 33 2c 54 72 69 | 61 6c 34 2c 43 75 72 72 |ial3,Tri|al4,Curr|
|00002bb0| 65 6e 74 54 72 69 61 6c | 41 72 72 61 79 2c 43 75 |entTrial|Array,Cu|
|00002bc0| 72 72 65 6e 74 54 72 69 | 61 6c 4e 75 6d 0d 69 66 |rrentTri|alNum.if|
|00002bd0| 20 4e 4f 54 20 6f 62 6a | 65 63 74 70 28 54 72 69 | NOT obj|ectp(Tri|
|00002be0| 61 6c 31 29 20 74 68 65 | 6e 20 2d 2d 20 64 6f 6e |al1) the|n -- don|
|00002bf0| 27 74 20 6d 61 6b 65 20 | 6f 76 65 72 0d 73 65 74 |'t make |over.set|
|00002c00| 20 54 72 69 61 6c 31 20 | 3d 20 41 72 72 61 79 4d | Trial1 |= ArrayM|
|00002c10| 61 6b 65 72 28 6d 4e 65 | 77 29 0d 73 65 74 20 54 |aker(mNe|w).set T|
|00002c20| 72 69 61 6c 32 20 3d 20 | 41 72 72 61 79 4d 61 6b |rial2 = |ArrayMak|
|00002c30| 65 72 28 6d 4e 65 77 29 | 0d 73 65 74 20 54 72 69 |er(mNew)|.set Tri|
|00002c40| 61 6c 33 20 3d 20 41 72 | 72 61 79 4d 61 6b 65 72 |al3 = Ar|rayMaker|
|00002c50| 28 6d 4e 65 77 29 0d 73 | 65 74 20 54 72 69 61 6c |(mNew).s|et Trial|
|00002c60| 34 20 3d 20 41 72 72 61 | 79 4d 61 6b 65 72 28 6d |4 = Arra|yMaker(m|
|00002c70| 4e 65 77 29 0d 65 6e 64 | 20 69 66 0d 42 6c 61 6e |New).end| if.Blan|
|00002c80| 6b 4c 6f 67 44 69 73 70 | 6c 61 79 0d 73 65 74 20 |kLogDisp|lay.set |
|00002c90| 43 75 72 72 65 6e 74 54 | 72 69 61 6c 4e 75 6d 20 |CurrentT|rialNum |
|00002ca0| 3d 20 31 0d 73 65 74 20 | 43 75 72 72 65 6e 74 54 |= 1.set |CurrentT|
|00002cb0| 72 69 61 6c 41 72 72 61 | 79 20 3d 20 54 72 69 61 |rialArra|y = Tria|
|00002cc0| 6c 31 20 2d 2d 20 0d 0d | 4d 61 63 72 6f 20 42 6c |l1 -- ..|Macro Bl|
|00002cd0| 61 6e 6b 4c 6f 67 44 69 | 73 70 6c 61 79 20 2d 2d |ankLogDi|splay --|
|00002ce0| 20 63 6c 65 61 72 73 20 | 73 74 72 69 6e 67 20 64 | clears |string d|
|00002cf0| 61 74 61 20 72 61 6e 67 | 65 20 6f 6e 6c 79 0d 67 |ata rang|e only.g|
|00002d00| 6c 6f 62 61 6c 20 54 72 | 69 61 6c 31 2c 54 72 69 |lobal Tr|ial1,Tri|
|00002d10| 61 6c 32 2c 54 72 69 61 | 6c 33 2c 54 72 69 61 6c |al2,Tria|l3,Trial|
|00002d20| 34 0d 73 65 74 20 73 70 | 61 63 65 20 3d 20 22 20 |4.set sp|ace = " |
|00002d30| 22 0d 73 65 74 20 69 20 | 3d 20 36 0d 72 65 70 65 |".set i |= 6.repe|
|00002d40| 61 74 20 77 68 69 6c 65 | 20 69 20 3c 3d 20 31 30 |at while| i <= 10|
|00002d50| 0d 20 20 20 20 73 65 74 | 20 65 6e 74 72 79 20 3d |. set| entry =|
|00002d60| 20 22 22 0d 20 20 20 20 | 73 65 74 20 6a 20 3d 20 | "". |set j = |
|00002d70| 31 0d 20 20 20 20 72 65 | 70 65 61 74 20 77 68 69 |1. re|peat whi|
|00002d80| 6c 65 20 6a 20 3c 3d 20 | 34 0d 20 20 20 20 20 20 |le j <= |4. |
|00002d90| 20 20 64 6f 20 22 54 72 | 69 61 6c 22 20 26 20 6a | do "Tr|ial" & j|
|00002da0| 20 26 20 22 28 6d 70 75 | 74 2c 22 20 26 20 69 26 | & "(mpu|t," & i&|
|00002db0| 22 2c 20 20 65 6d 70 74 | 79 20 29 22 20 2d 2d 20 |", empt|y )" -- |
|00002dc0| 72 65 61 64 20 61 72 72 | 61 79 20 65 6e 74 72 79 |read arr|ay entry|
|00002dd0| 20 2d 2d 20 6f 76 65 72 | 72 69 64 65 20 64 65 66 | -- over|ride def|
|00002de0| 61 75 6c 74 20 22 30 22 | 73 0d 20 20 20 20 20 20 |ault "0"|s. |
|00002df0| 20 20 73 65 74 20 6a 20 | 3d 20 6a 20 2b 20 31 0d | set j |= j + 1.|
|00002e00| 20 20 20 20 65 6e 64 20 | 72 65 70 65 61 74 0d 20 | end |repeat. |
|00002e10| 20 20 20 73 65 74 20 69 | 20 3d 20 69 20 2b 20 31 | set i| = i + 1|
|00002e20| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 0d 6d 61 63 |.end rep|eat..mac|
|00002e30| 72 6f 20 46 6c 6f 61 74 | 4c 6f 67 45 6e 74 72 79 |ro Float|LogEntry|
|00002e40| 20 44 61 74 61 2c 4c 69 | 6e 65 2c 20 53 68 69 66 | Data,Li|ne, Shif|
|00002e50| 74 20 2d 2d 20 75 73 65 | 72 20 65 6e 74 65 72 65 |t -- use|r entere|
|00002e60| 64 20 76 61 6c 75 65 0d | 67 6c 6f 62 61 6c 20 43 |d value.|global C|
|00002e70| 75 72 72 65 6e 74 54 72 | 69 61 6c 41 72 72 61 79 |urrentTr|ialArray|
|00002e80| 0d 43 75 72 72 65 6e 74 | 54 72 69 61 6c 41 72 72 |.Current|TrialArr|
|00002e90| 61 79 28 6d 70 75 74 2c | 4c 69 6e 65 20 2b 20 35 |ay(mput,|Line + 5|
|00002ea0| 2c 44 61 74 61 29 20 2d | 2d 20 64 69 73 70 6c 61 |,Data) -|- displa|
|00002eb0| 79 65 64 20 76 65 72 73 | 69 6f 6e 0d 43 75 72 72 |yed vers|ion.Curr|
|00002ec0| 65 6e 74 54 72 69 61 6c | 41 72 72 61 79 28 6d 70 |entTrial|Array(mp|
|00002ed0| 75 74 2c 4c 69 6e 65 20 | 2c 53 68 69 66 74 44 65 |ut,Line |,ShiftDe|
|00002ee0| 63 69 6d 61 6c 28 44 61 | 74 61 2c 53 68 69 66 74 |cimal(Da|ta,Shift|
|00002ef0| 2c 30 29 29 2d 2d 20 69 | 6e 74 65 72 67 65 72 20 |,0))-- i|nterger |
|00002f00| 43 6f 6d 70 75 74 65 72 | 20 76 65 72 73 69 6f 6e |Computer| version|
|00002f10| 0d 0d 4d 61 63 72 6f 20 | 42 75 69 6c 64 4c 6f 67 |..Macro |BuildLog|
|00002f20| 44 69 73 70 6c 61 79 0d | 67 6c 6f 62 61 6c 20 54 |Display.|global T|
|00002f30| 72 69 61 6c 31 2c 54 72 | 69 61 6c 32 2c 54 72 69 |rial1,Tr|ial2,Tri|
|00002f40| 61 6c 33 2c 54 72 69 61 | 6c 34 0d 73 65 74 20 54 |al3,Tria|l4.set T|
|00002f50| 62 6c 20 3d 20 22 22 0d | 73 65 74 20 69 20 3d 20 |bl = "".|set i = |
|00002f60| 36 0d 72 65 70 65 61 74 | 20 77 68 69 6c 65 20 69 |6.repeat| while i|
|00002f70| 20 3c 3d 20 31 30 0d 20 | 20 20 20 73 65 74 20 65 | <= 10. | set e|
|00002f80| 6e 74 72 79 20 3d 20 22 | 22 0d 20 20 20 20 73 65 |ntry = "|". se|
|00002f90| 74 20 6a 20 3d 20 31 0d | 20 20 20 20 72 65 70 65 |t j = 1.| repe|
|00002fa0| 61 74 20 77 68 69 6c 65 | 20 6a 20 3c 3d 20 34 0d |at while| j <= 4.|
|00002fb0| 20 20 20 20 20 20 20 20 | 64 6f 20 22 73 65 74 20 | |do "set |
|00002fc0| 78 20 3d 20 54 72 69 61 | 6c 22 20 26 20 6a 20 26 |x = Tria|l" & j &|
|00002fd0| 20 22 28 6d 67 65 74 2c | 69 29 22 20 2d 2d 20 72 | "(mget,|i)" -- r|
|00002fe0| 65 61 64 20 61 72 72 61 | 79 20 65 6e 74 72 79 0d |ead arra|y entry.|
|00002ff0| 20 20 20 20 20 20 20 20 | 2d 2d 20 70 61 64 64 20 | |-- padd |
|00003000| 77 69 74 68 20 74 72 61 | 69 6c 69 6e 67 20 73 70 |with tra|iling sp|
|00003010| 61 63 65 73 0d 20 20 20 | 20 20 20 20 20 69 66 20 |aces. | if |
|00003020| 6a 20 3c 20 34 20 74 68 | 65 6e 20 73 65 74 20 65 |j < 4 th|en set e|
|00003030| 6e 74 72 79 20 3d 20 65 | 6e 74 72 79 20 26 20 63 |ntry = e|ntry & c|
|00003040| 68 61 72 73 28 78 20 26 | 20 22 20 20 20 20 20 20 |hars(x &| " |
|00003050| 20 20 22 2c 31 2c 20 38 | 29 20 2d 2d 20 70 61 64 | ",1, 8|) -- pad|
|00003060| 64 20 66 6f 72 20 38 20 | 64 69 67 69 74 20 63 6f |d for 8 |digit co|
|00003070| 6c 75 6d 6e 0d 20 20 20 | 20 20 20 20 20 65 6c 73 |lumn. | els|
|00003080| 65 20 73 65 74 20 65 6e | 74 72 79 20 3d 20 65 6e |e set en|try = en|
|00003090| 74 72 79 20 26 20 78 20 | 2d 2d 20 64 6f 6e 27 74 |try & x |-- don't|
|000030a0| 20 70 61 64 20 6c 3b 61 | 73 74 20 63 6f 6c 75 6d | pad l;a|st colum|
|000030b0| 6e 0d 20 20 20 20 20 20 | 20 20 73 65 74 20 6a 20 |n. | set j |
|000030c0| 3d 20 6a 20 2b 20 31 0d | 20 20 20 20 65 6e 64 20 |= j + 1.| end |
|000030d0| 72 65 70 65 61 74 0d 73 | 65 74 20 54 62 6c 20 3d |repeat.s|et Tbl =|
|000030e0| 20 54 62 6c 20 20 26 20 | 65 6e 74 72 79 20 26 20 | Tbl & |entry & |
|000030f0| 72 65 74 75 72 6e 20 26 | 72 65 74 75 72 6e 2d 2d |return &|return--|
|00003100| 20 64 6f 75 62 6c 65 20 | 6c 69 6e 65 20 73 70 61 | double |line spa|
|00003110| 63 65 0d 20 20 20 20 73 | 65 74 20 69 20 3d 20 69 |ce. s|et i = i|
|00003120| 20 2b 20 31 0d 65 6e 64 | 20 72 65 70 65 61 74 0d | + 1.end| repeat.|
|00003130| 73 65 74 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 |set the |text of |
|00003140| 63 61 73 74 20 41 32 34 | 20 3d 20 54 62 6c 20 2d |cast A24| = Tbl -|
|00003150| 2d 20 64 69 73 70 6c 61 | 79 20 69 74 0d 0d 0d 6d |- displa|y it...m|
|00003160| 61 63 72 6f 20 53 68 69 | 66 74 44 65 63 69 6d 61 |acro Shi|ftDecima|
|00003170| 6c 20 54 68 65 4e 75 6d | 2c 20 53 68 69 66 74 2c |l TheNum|, Shift,|
|00003180| 20 50 72 65 63 69 73 69 | 6f 6e 0d 2d 2d 20 64 6f | Precisi|on.-- do|
|00003190| 65 73 6e 27 74 20 70 61 | 64 64 20 69 6e 20 6c 65 |esn't pa|dd in le|
|000031a0| 61 64 69 6e 67 20 7a 65 | 72 6f 73 20 77 68 65 6e |ading ze|ros when|
|000031b0| 20 73 68 69 66 74 69 6e | 67 20 6c 65 66 74 20 28 | shiftin|g left (|
|000031c0| 79 65 74 29 0d 2d 2d 61 | 73 73 75 6d 65 20 76 61 |yet).--a|ssume va|
|000031d0| 6c 69 64 20 6e 75 6d 62 | 65 72 0d 69 66 20 69 6e |lid numb|er.if in|
|000031e0| 74 65 67 65 72 70 28 54 | 68 65 4e 75 6d 29 20 74 |tegerp(T|heNum) t|
|000031f0| 68 65 6e 0d 20 20 20 20 | 73 65 74 20 4f 6c 64 44 |hen. |set OldD|
|00003200| 70 6f 69 6e 74 20 3d 20 | 30 0d 20 20 20 20 73 65 |point = |0. se|
|00003210| 74 20 54 68 65 4e 75 6d | 20 3d 20 73 74 72 69 6e |t TheNum| = strin|
|00003220| 67 28 54 68 65 4e 75 6d | 29 0d 65 6c 73 65 20 2d |g(TheNum|).else -|
|00003230| 2d 20 6c 6f 63 61 74 65 | 20 64 65 63 69 6d 61 6c |- locate| decimal|
|00003240| 20 70 6f 69 6e 74 20 69 | 6e 20 66 6c 6f 61 74 69 | point i|n floati|
|00003250| 6e 67 20 70 6f 69 6e 74 | 20 73 74 72 69 6e 67 20 |ng point| string |
|00003260| 28 20 61 73 75 6d 65 20 | 6f 6e 6c 79 20 31 29 0d |( asume |only 1).|
|00003270| 20 20 20 20 73 65 74 20 | 69 20 3d 20 31 0d 20 20 | set |i = 1. |
|00003280| 20 20 73 65 74 20 4f 6c | 64 44 70 6f 69 6e 74 20 | set Ol|dDpoint |
|00003290| 3d 20 30 20 2d 2d 20 69 | 66 20 6e 6f 6e 65 20 65 |= 0 -- i|f none e|
|000032a0| 78 69 73 74 73 0d 20 20 | 20 20 72 65 70 65 61 74 |xists. | repeat|
|000032b0| 20 77 68 69 6c 65 20 69 | 20 3c 3d 20 6c 65 6e 67 | while i| <= leng|
|000032c0| 74 68 28 54 68 65 4e 75 | 6d 29 20 0d 20 20 20 20 |th(TheNu|m) . |
|000032d0| 20 20 20 2d 2d 20 70 75 | 74 20 6c 65 6e 67 74 68 | -- pu|t length|
|000032e0| 28 54 68 65 4e 75 6d 29 | 20 20 26 20 22 20 20 20 |(TheNum)| & " |
|000032f0| 22 20 26 69 20 26 20 22 | 20 22 26 63 68 61 72 73 |" &i & "| "&chars|
|00003300| 28 54 68 65 4e 75 6d 2c | 69 2c 69 2b 31 29 20 2d |(TheNum,|i,i+1) -|
|00003310| 2d 24 24 24 0d 20 20 20 | 20 20 20 20 20 69 66 20 |-$$$. | if |
|00003320| 63 68 61 72 73 28 54 68 | 65 4e 75 6d 2c 69 2c 69 |chars(Th|eNum,i,i|
|00003330| 29 20 3d 20 22 2e 22 20 | 74 68 65 6e 20 0d 73 65 |) = "." |then .se|
|00003340| 74 20 54 68 65 4e 75 6d | 20 3d 20 63 68 61 72 73 |t TheNum| = chars|
|00003350| 28 54 68 65 4e 75 6d 2c | 31 2c 69 20 2d 31 29 20 |(TheNum,|1,i -1) |
|00003360| 26 20 63 68 61 72 73 28 | 54 68 65 4e 75 6d 2c 69 |& chars(|TheNum,i|
|00003370| 20 2b 20 31 2c 6c 65 6e | 67 74 68 28 54 68 65 4e | + 1,len|gth(TheN|
|00003380| 75 6d 29 29 0d 20 20 20 | 20 20 20 20 20 20 20 20 |um)). | |
|00003390| 20 73 65 74 20 4f 6c 64 | 44 70 6f 69 6e 74 20 3d | set Old|Dpoint =|
|000033a0| 20 20 4c 65 6e 67 74 68 | 28 54 68 65 4e 75 6d 29 | Length|(TheNum)|
|000033b0| 20 2d 20 69 20 2b 20 31 | 20 2d 2d 20 6f 76 65 72 | - i + 1| -- over|
|000033c0| 20 66 72 6f 6d 20 72 69 | 67 68 74 20 28 20 70 72 | from ri|ght ( pr|
|000033d0| 65 73 69 73 69 6f 6e 20 | 75 6e 69 74 73 29 0d 20 |esision |units). |
|000033e0| 20 20 20 20 20 20 20 20 | 20 20 20 2d 2d 20 70 75 | | -- pu|
|000033f0| 74 20 22 66 6c 75 73 68 | 69 6e 67 20 64 65 63 69 |t "flush|ing deci|
|00003400| 6d 61 6c 20 61 74 3a 20 | 22 26 20 69 20 26 22 20 |mal at: |"& i &" |
|00003410| 20 20 4f 6c 64 44 70 6f | 69 6e 74 3a 20 22 26 4f | OldDpo|int: "&O|
|00003420| 6c 64 44 70 6f 69 6e 74 | 2d 2d 24 24 24 0d 20 20 |ldDpoint|--$$$. |
|00003430| 20 20 20 20 20 20 20 20 | 20 20 65 78 69 74 20 72 | | exit r|
|00003440| 65 70 65 61 74 0d 20 20 | 20 20 20 20 20 20 65 6e |epeat. | en|
|00003450| 64 20 69 66 0d 20 20 20 | 20 20 20 20 20 73 65 74 |d if. | set|
|00003460| 20 69 20 3d 20 69 20 2b | 20 31 0d 20 20 20 20 65 | i = i +| 1. e|
|00003470| 6e 64 20 72 65 70 65 61 | 74 0d 65 6e 64 20 69 66 |nd repea|t.end if|
|00003480| 0d 2d 2d 20 73 68 69 66 | 74 20 70 6f 69 6e 74 20 |.-- shif|t point |
|00003490| 28 73 63 61 6c 69 6e 67 | 29 0d 73 65 74 20 44 70 |(scaling|).set Dp|
|000034a0| 6f 69 6e 74 20 3d 20 4f | 6c 64 44 70 6f 69 6e 74 |oint = O|ldDpoint|
|000034b0| 20 2d 20 53 68 69 66 74 | 20 2d 2d 20 6e 65 77 20 | - Shift| -- new |
|000034c0| 64 65 63 69 6d 61 6c 20 | 70 6f 69 6e 74 20 70 6f |decimal |point po|
|000034d0| 73 69 74 69 6f 6e 20 72 | 65 6c 61 74 69 76 65 20 |sition r|elative |
|000034e0| 74 6f 20 63 75 72 72 65 | 6e 74 20 73 74 72 69 6e |to curre|nt strin|
|000034f0| 67 20 0d 2d 2d 20 70 61 | 64 64 20 66 6f 72 20 62 |g .-- pa|dd for b|
|00003500| 6f 74 68 20 73 68 69 66 | 74 20 61 6e 64 20 70 72 |oth shif|t and pr|
|00003510| 65 63 69 73 69 6f 6e 0d | 73 65 74 20 4f 4c 20 3d |ecision.|set OL =|
|00003520| 20 6c 65 6e 67 74 68 28 | 54 68 65 4e 75 6d 29 0d | length(|TheNum).|
|00003530| 69 66 20 70 72 65 63 69 | 73 69 6f 6e 20 3e 20 44 |if preci|sion > D|
|00003540| 70 6f 69 6e 74 20 20 74 | 68 65 6e 20 73 65 74 20 |point t|hen set |
|00003550| 54 68 65 4e 75 6d 20 3d | 20 c2 0d 54 68 65 4e 75 |TheNum =| ..TheNu|
|00003560| 6d 20 26 20 63 68 61 72 | 73 28 22 30 30 30 30 30 |m & char|s("00000|
|00003570| 30 22 2c 31 2c 20 70 72 | 65 63 69 73 69 6f 6e 20 |0",1, pr|ecision |
|00003580| 2d 20 44 70 6f 69 6e 74 | 20 20 29 20 2d 2d 20 74 |- Dpoint| ) -- t|
|00003590| 61 63 6b 20 6f 6e 20 7a | 65 72 6f 73 0d 73 65 74 |ack on z|eros.set|
|000035a0| 20 57 68 6f 6c 65 20 3d | 20 63 68 61 72 73 28 54 | Whole =| chars(T|
|000035b0| 68 65 4e 75 6d 2c 31 2c | 4f 4c 20 2d 20 44 70 6f |heNum,1,|OL - Dpo|
|000035c0| 69 6e 74 29 20 2d 2d 20 | 6c 65 66 74 20 6f 66 20 |int) -- |left of |
|000035d0| 64 65 63 69 6d 61 6c 0d | 69 66 20 70 72 65 63 69 |decimal.|if preci|
|000035e0| 73 69 6f 6e 20 3e 20 30 | 20 74 68 65 6e 0d 20 20 |sion > 0| then. |
|000035f0| 20 20 73 65 74 20 54 68 | 65 4e 75 6d 20 3d 20 57 | set Th|eNum = W|
|00003600| 68 6f 6c 65 20 26 22 2e | 22 26 20 63 68 61 72 73 |hole &".|"& chars|
|00003610| 28 54 68 65 4e 75 6d 2c | 4f 4c 20 2d 20 44 70 6f |(TheNum,|OL - Dpo|
|00003620| 69 6e 74 20 2b 20 31 2c | 4f 4c 20 2d 20 44 70 6f |int + 1,|OL - Dpo|
|00003630| 69 6e 74 20 2b 20 70 72 | 65 63 69 73 69 6f 6e 29 |int + pr|ecision)|
|00003640| 0d 65 6c 73 65 0d 73 65 | 74 20 54 68 65 4e 75 6d |.else.se|t TheNum|
|00003650| 20 3d 20 57 68 6f 6c 65 | 0d 65 6e 64 20 69 66 0d | = Whole|.end if.|
|00003660| 69 66 20 70 72 65 63 69 | 73 69 6f 6e 20 3d 20 30 |if preci|sion = 0|
|00003670| 20 74 68 65 6e 20 73 65 | 74 20 54 68 65 4e 75 6d | then se|t TheNum|
|00003680| 20 3d 20 76 61 6c 75 65 | 28 54 68 65 4e 75 6d 29 | = value|(TheNum)|
|00003690| 0d 20 72 65 74 75 72 6e | 20 54 68 65 4e 75 6d 0d |. return| TheNum.|
|000036a0| 0d 0d 6d 61 63 72 6f 20 | 49 6e 69 74 69 61 6c 52 |..macro |InitialR|
|000036b0| 65 61 64 69 6e 67 0d 67 | 6c 6f 62 61 6c 20 43 75 |eading.g|lobal Cu|
|000036c0| 72 72 65 6e 74 54 72 69 | 61 6c 4e 75 6d 0d 69 66 |rrentTri|alNum.if|
|000036d0| 20 6e 6f 74 20 69 6e 74 | 65 67 65 72 70 28 43 75 | not int|egerp(Cu|
|000036e0| 72 72 65 6e 74 54 72 69 | 61 6c 4e 75 6d 29 20 74 |rrentTri|alNum) t|
|000036f0| 68 65 6e 20 73 65 74 20 | 43 75 72 72 65 6e 74 54 |hen set |CurrentT|
|00003700| 72 69 61 6c 4e 75 6d 20 | 3d 20 31 0d 2d 2d 41 63 |rialNum |= 1.--Ac|
|00003710| 63 65 70 74 54 65 78 74 | 45 64 69 74 20 43 75 72 |ceptText|Edit Cur|
|00003720| 72 65 6e 74 54 72 69 61 | 6c 4e 75 6d 2c 20 31 0d |rentTria|lNum, 1.|
|00003730| 41 63 63 65 70 74 54 65 | 78 74 45 64 69 74 20 31 |AcceptTe|xtEdit 1|
|00003740| 2c 31 20 2d 2d 24 24 24 | 0d 41 63 63 65 70 74 54 |,1 --$$$|.AcceptT|
|00003750| 65 78 74 45 64 69 74 20 | 31 2c 31 20 2d 2d 24 24 |extEdit |1,1 --$$|
|00003760| 24 20 2d 2d 20 74 61 6b | 65 73 20 32 20 28 20 6f |$ -- tak|es 2 ( o|
|00003770| 66 20 73 6f 6d 65 74 68 | 69 6e 67 29 20 74 6f 20 |f someth|ing) to |
|00003780| 67 65 74 20 69 6e 73 65 | 72 74 20 63 75 72 73 6f |get inse|rt curso|
|00003790| 72 20 61 74 20 6e 65 77 | 20 6c 6f 63 0d 70 61 75 |r at new| loc.pau|
|000037a0| 73 65 20 2d 2d 20 75 6e | 74 69 6c 20 75 73 65 72 |se -- un|til user|
|000037b0| 20 63 6f 6e 66 69 72 6d | 73 20 65 6e 74 72 79 0d | confirm|s entry.|
|000037c0| 0d 6d 61 63 72 6f 20 44 | 75 70 41 63 63 65 70 74 |.macro D|upAccept|
|000037d0| 54 65 78 74 45 64 69 74 | 20 41 2c 42 0d 41 63 63 |TextEdit| A,B.Acc|
|000037e0| 65 70 74 54 65 78 74 45 | 64 69 74 20 41 2c 42 0d |eptTextE|dit A,B.|
|000037f0| 41 63 63 65 70 74 54 65 | 78 74 45 64 69 74 20 41 |AcceptTe|xtEdit A|
|00003800| 2c 42 0d 0d 6d 61 63 72 | 6f 20 48 61 6c 74 54 65 |,B..macr|o HaltTe|
|00003810| 78 74 45 64 69 74 0d 67 | 6c 6f 62 61 6c 20 20 4c |xtEdit.g|lobal L|
|00003820| 61 73 74 45 6e 74 72 79 | 0d 73 65 74 20 74 68 65 |astEntry|.set the|
|00003830| 20 6b 65 79 64 6f 77 6e | 53 63 72 69 70 74 20 3d | keydown|Script =|
|00003840| 20 65 6d 70 74 79 0d 73 | 65 74 20 74 68 65 20 70 | empty.s|et the p|
|00003850| 75 70 70 65 74 20 6f 66 | 20 73 70 72 69 74 65 20 |uppet of| sprite |
|00003860| 32 33 20 74 6f 20 66 61 | 6c 73 65 20 2d 2d 20 68 |23 to fa|lse -- h|
|00003870| 69 64 65 20 69 6e 20 64 | 65 66 61 75 6c 74 20 6c |ide in d|efault l|
|00003880| 6f 63 0d 73 65 74 20 4c | 61 73 74 45 6e 74 72 79 |oc.set L|astEntry|
|00003890| 20 3d 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 63 | = the t|ext of c|
|000038a0| 61 73 74 20 41 31 38 20 | 2d 2d 20 69 67 6e 6f 72 |ast A18 |-- ignor|
|000038b0| 65 20 61 6e 79 20 6d 6f | 72 65 20 74 79 70 69 6e |e any mo|re typin|
|000038c0| 67 0d 0d 6d 61 63 72 6f | 20 41 63 63 65 70 74 54 |g..macro| AcceptT|
|000038d0| 65 78 74 45 64 69 74 20 | 43 6f 6c 75 6d 6e 2c 52 |extEdit |Column,R|
|000038e0| 6f 77 20 2d 2d 20 6d 6f | 76 65 73 20 65 64 69 74 |ow -- mo|ves edit|
|000038f0| 61 62 6c 65 20 74 78 74 | 20 6f 62 6a 65 63 74 20 |able txt| object |
|00003900| 6f 76 65 72 20 6c 61 72 | 67 65 20 74 61 62 6c 65 |over lar|ge table|
|00003910| 0d 67 6c 6f 62 61 6c 20 | 45 6e 74 72 79 58 2c 45 |.global |EntryX,E|
|00003920| 6e 74 72 79 59 20 2d 2d | 2c 20 4c 61 73 74 45 6e |ntryY --|, LastEn|
|00003930| 74 72 79 0d 73 65 74 20 | 45 6e 74 72 79 58 20 3d |try.set |EntryX =|
|00003940| 20 43 6f 6c 75 6d 6e 0d | 73 65 74 20 45 6e 74 72 | Column.|set Entr|
|00003950| 79 59 20 3d 20 52 6f 77 | 0d 73 65 74 20 74 68 65 |yY = Row|.set the|
|00003960| 20 6b 65 79 64 6f 77 6e | 53 63 72 69 70 74 20 3d | keydown|Script =|
|00003970| 20 22 54 65 78 74 4b 65 | 79 4d 6f 6e 69 74 6f 72 | "TextKe|yMonitor|
|00003980| 22 0d 73 65 74 20 74 68 | 65 20 70 75 70 70 65 74 |".set th|e puppet|
|00003990| 20 6f 66 20 73 70 72 69 | 74 65 20 32 33 20 74 6f | of spri|te 23 to|
|000039a0| 20 74 72 75 65 20 2d 2d | 20 6f 76 65 72 6c 61 79 | true --| overlay|
|000039b0| 65 64 20 65 64 69 74 61 | 62 6c 65 20 74 65 78 74 |ed edita|ble text|
|000039c0| 20 65 6e 74 72 79 20 62 | 6f 78 0d 73 65 74 20 74 | entry b|ox.set t|
|000039d0| 68 65 20 6c 6f 63 48 20 | 6f 66 20 73 70 72 69 74 |he locH |of sprit|
|000039e0| 65 20 32 33 20 74 6f 20 | 28 74 68 65 20 6c 65 66 |e 23 to |(the lef|
|000039f0| 74 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 2b 20 |t of spr|ite 8 + |
|00003a00| 31 30 32 29 20 2b 20 28 | 43 6f 6c 75 6d 6e 20 2d |102) + (|Column -|
|00003a10| 20 31 29 20 2a 20 35 36 | 0d 73 65 74 20 74 68 65 | 1) * 56|.set the|
|00003a20| 20 6c 6f 63 56 20 6f 66 | 20 73 70 72 69 74 65 20 | locV of| sprite |
|00003a30| 32 33 20 74 6f 20 28 74 | 68 65 20 74 6f 70 20 6f |23 to (t|he top o|
|00003a40| 66 20 73 70 72 69 74 65 | 20 38 20 2b 20 33 38 29 |f sprite| 8 + 38)|
|00003a50| 20 2b 20 20 28 52 6f 77 | 20 2d 20 31 29 20 2a 20 | + (Row| - 1) * |
|00003a60| 33 32 0d 73 65 74 20 74 | 68 65 20 74 65 78 74 20 |32.set t|he text |
|00003a70| 6f 66 20 63 61 73 74 20 | 41 31 38 20 74 6f 20 22 |of cast |A18 to "|
|00003a80| 22 20 2d 2d 20 63 6c 65 | 61 72 20 66 6f 72 20 6e |" -- cle|ar for n|
|00003a90| 65 77 20 65 6e 74 72 79 | 20 28 20 73 70 72 69 74 |ew entry| ( sprit|
|00003aa0| 65 20 32 33 20 63 6f 6e | 74 65 6e 74 29 0d 75 70 |e 23 con|tent).up|
|00003ab0| 64 61 74 65 53 74 61 67 | 65 0d 2d 2d 73 65 74 20 |dateStag|e.--set |
|00003ac0| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 63 61 |the hili|te of ca|
|00003ad0| 73 74 20 41 31 38 20 74 | 6f 20 74 72 75 65 20 2d |st A18 t|o true -|
|00003ae0| 2d 20 75 73 65 6c 65 73 | 73 20 66 6f 72 20 6e 6f |- useles|s for no|
|00003af0| 6e 2d 62 75 74 74 6f 6e | 0d 2d 2d 2a 2a 2a 20 6b |n-button|.--*** k|
|00003b00| 65 79 20 63 6f 64 65 73 | 20 2a 2a 2a 0d 2d 2d 20 |ey codes| ***.-- |
|00003b10| 22 31 38 20 20 31 22 0d | 2d 2d 20 22 31 39 20 20 |"18 1".|-- "19 |
|00003b20| 32 22 0d 2d 2d 20 22 32 | 30 20 20 33 22 0d 2d 2d |2".-- "2|0 3".--|
|00003b30| 20 22 32 31 20 20 34 22 | 0d 2d 2d 20 22 32 33 20 | "21 4"|.-- "23 |
|00003b40| 20 35 22 0d 2d 2d 20 22 | 32 32 20 20 36 22 0d 2d | 5".-- "|22 6".-|
|00003b50| 2d 20 22 32 36 20 20 37 | 22 0d 2d 2d 20 22 32 38 |- "26 7|".-- "28|
|00003b60| 20 20 38 22 0d 2d 2d 20 | 22 32 35 20 20 39 22 0d | 8".-- |"25 9".|
|00003b70| 2d 2d 20 22 32 39 20 20 | 30 22 0d 2d 2d 20 22 34 |-- "29 |0".-- "4|
|00003b80| 37 20 20 2e 22 0d 2d 2d | 20 22 33 36 20 20 72 65 |7 .".--| "36 re|
|00003b90| 74 75 72 6e 0d 2d 2d 20 | 22 37 36 20 20 03 22 20 |turn.-- |"76 ." |
|00003ba0| 65 6e 74 65 72 0d 2d 2d | 20 22 35 31 20 20 08 22 |enter.--| "51 ."|
|00003bb0| 20 64 65 6c 65 74 65 0d | 2d 2d 20 22 31 32 33 20 | delete.|-- "123 |
|00003bc0| 20 1c 22 20 6c 65 66 74 | 20 61 72 72 6f 77 0d 2d | ." left| arrow.-|
|00003bd0| 2d 20 22 31 32 34 20 20 | 1d 22 20 20 72 69 67 68 |- "124 |." righ|
|00003be0| 74 20 61 72 72 6f 77 0d | 0d 6d 61 63 72 6f 20 54 |t arrow.|.macro T|
|00003bf0| 65 78 74 4b 65 79 4d 6f | 6e 69 74 6f 72 20 2d 2d |extKeyMo|nitor --|
|00003c00| 20 61 63 74 69 76 65 20 | 64 75 72 69 6e 67 20 75 | active |during u|
|00003c10| 73 65 72 20 69 6e 70 75 | 74 0d 2d 2d 70 75 74 20 |ser inpu|t.--put |
|00003c20| 74 68 65 20 6b 65 79 43 | 6f 64 65 20 26 20 22 20 |the keyC|ode & " |
|00003c30| 20 22 26 20 74 68 65 20 | 6b 65 79 0d 69 66 20 6c | "& the |key.if l|
|00003c40| 65 6e 67 74 68 28 20 74 | 68 65 20 74 65 78 74 20 |ength( t|he text |
|00003c50| 6f 66 20 63 61 73 74 20 | 61 31 38 29 20 20 3e 20 |of cast |a18) > |
|00003c60| 37 20 74 68 65 6e 0d 20 | 20 20 20 62 65 65 70 0d |7 then. | beep.|
|00003c70| 65 6c 73 65 0d 20 20 20 | 20 69 66 20 28 20 74 68 |else. | if ( th|
|00003c80| 65 20 6b 65 79 20 3e 3d | 20 22 30 22 20 61 6e 64 |e key >=| "0" and|
|00003c90| 20 74 68 65 20 6b 65 79 | 20 3c 3d 22 39 22 20 29 | the key| <="9" )|
|00003ca0| 20 6f 72 20 74 68 65 20 | 6b 65 79 20 3d 20 22 2e | or the |key = ".|
|00003cb0| 22 20 6f 72 20 74 68 65 | 20 6b 65 79 20 3d 20 62 |" or the| key = b|
|00003cc0| 61 63 6b 73 70 61 63 65 | 20 74 68 65 6e 0d 20 20 |ackspace| then. |
|00003cd0| 20 20 20 20 20 20 2d 2d | 20 61 63 63 65 70 74 65 | --| accepte|
|00003ce0| 64 20 69 6e 70 75 74 0d | 20 20 20 20 65 6c 73 65 |d input.| else|
|00003cf0| 0d 20 20 20 20 20 20 20 | 20 69 66 20 74 68 65 20 |. | if the |
|00003d00| 6b 65 79 20 3d 20 72 65 | 74 75 72 6e 20 6f 72 20 |key = re|turn or |
|00003d10| 74 68 65 20 6b 65 79 20 | 3d 20 65 6e 74 65 72 20 |the key |= enter |
|00003d20| 74 68 65 6e 20 2d 2d 20 | 65 6e 74 72 79 20 63 6f |then -- |entry co|
|00003d30| 6d 70 6c 65 74 65 0d 20 | 20 20 20 20 20 20 20 49 |mplete. | I|
|00003d40| 6e 69 74 69 61 6c 43 6f | 6e 66 69 72 6d 0d 20 20 |nitialCo|nfirm. |
|00003d50| 20 20 20 20 20 20 64 6f | 6e 74 50 61 73 73 45 76 | do|ntPassEv|
|00003d60| 65 6e 74 0d 20 20 20 20 | 20 20 20 20 65 6c 73 65 |ent. | else|
|00003d70| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 62 65 65 |. | bee|
|00003d80| 70 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 64 6f |p. | do|
|00003d90| 6e 74 50 61 73 73 45 76 | 65 6e 74 20 0d 20 20 20 |ntPassEv|ent . |
|00003da0| 20 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 | end| if. |
|00003db0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 0d 6d |end if.e|nd if..m|
|00003dc0| 61 63 72 6f 20 49 6e 69 | 74 69 61 6c 43 6f 6e 66 |acro Ini|tialConf|
|00003dd0| 69 72 6d 0d 73 65 74 20 | 69 74 20 3d 20 20 6d 6f |irm.set |it = mo|
|00003de0| 64 61 6c 44 69 61 6c 6f | 67 28 22 61 6e 73 77 65 |dalDialo|g("answe|
|00003df0| 72 78 78 22 2c 20 22 64 | 65 66 61 75 6c 74 2c 54 |rxx", "d|efault,T|
|00003e00| 68 69 73 20 69 73 20 69 | 74 22 20 26 20 72 65 74 |his is i|t" & ret|
|00003e10| 75 72 6e 20 26 22 63 61 | 6e 63 65 6c 2c 52 65 2d |urn &"ca|ncel,Re-|
|00003e20| 45 6e 74 65 72 22 20 20 | 26 20 72 65 74 75 72 6e |Enter" |& return|
|00003e30| 20 26 20 22 41 72 65 20 | 79 6f 75 20 73 68 75 72 | & "Are |you shur|
|00003e40| 65 20 22 26 20 74 68 65 | 20 74 65 78 74 20 6f 66 |e "& the| text of|
|00003e50| 20 63 61 73 74 20 61 31 | 38 20 26 22 20 69 73 20 | cast a1|8 &" is |
|00003e60| 69 74 3f 22 2c 32 30 2c | 32 30 29 0d 70 75 74 20 |it?",20,|20).put |
|00003e70| 22 41 6e 73 77 65 72 20 | 28 69 74 29 3d 22 26 20 |"Answer |(it)="& |
|00003e80| 69 74 20 2d 2d 24 24 24 | 0d 69 66 20 69 74 20 3c |it --$$$|.if it <|
|00003e90| 3e 20 22 43 61 6e 63 65 | 6c 22 20 74 68 65 6e 0d |> "Cance|l" then.|
|00003ea0| 70 75 74 20 22 4e 4f 54 | 20 43 41 4e 43 45 4c 22 |put "NOT| CANCEL"|
|00003eb0| 20 2d 2d 24 24 24 0d 20 | 20 20 20 48 61 6c 74 54 | --$$$. | HaltT|
|00003ec0| 65 78 74 45 64 69 74 0d | 20 20 20 20 49 6e 73 65 |extEdit.| Inse|
|00003ed0| 72 74 43 75 72 72 65 6e | 74 45 6e 74 72 79 0d 20 |rtCurren|tEntry. |
|00003ee0| 20 20 20 42 75 69 6c 64 | 4c 6f 67 44 69 73 70 6c | Build|LogDispl|
|00003ef0| 61 79 20 2d 2d 20 75 70 | 64 61 74 65 20 6c 6f 67 |ay -- up|date log|
|00003f00| 62 6f 6f 6b 20 64 69 73 | 70 6c 61 74 0d 67 6f 20 |book dis|plat.go |
|00003f10| 74 6f 20 74 68 65 20 66 | 72 61 6d 65 20 2b 20 31 |to the f|rame + 1|
|00003f20| 20 2d 2d 20 73 74 61 72 | 74 20 74 69 74 72 61 74 | -- star|t titrat|
|00003f30| 69 6f 6e 0d 65 6c 73 65 | 20 2d 2d 20 64 6f 20 6e |ion.else| -- do n|
|00003f40| 6f 74 68 69 6e 67 0d 65 | 6e 64 20 69 66 0d 6d 61 |othing.e|nd if.ma|
|00003f50| 63 72 6f 20 49 6e 73 65 | 72 74 43 75 72 72 65 6e |cro Inse|rtCurren|
|00003f60| 74 45 6e 74 72 79 0d 67 | 6c 6f 62 61 6c 20 45 6e |tEntry.g|lobal En|
|00003f70| 74 72 79 58 2c 45 6e 74 | 72 79 59 2c 20 4c 61 73 |tryX,Ent|ryY, Las|
|00003f80| 74 45 6e 74 72 79 0d 46 | 6c 6f 61 74 4c 6f 67 45 |tEntry.F|loatLogE|
|00003f90| 6e 74 72 79 20 4c 61 73 | 74 45 6e 74 72 79 2c 20 |ntry Las|tEntry, |
|00003fa0| 45 6e 74 72 79 59 2c 20 | 31 30 30 20 2d 2d 20 6c |EntryY, |100 -- l|
|00003fb0| 61 73 74 20 6e 75 6d 20 | 73 63 61 6c 65 20 66 61 |ast num |scale fa|
|00003fc0| 63 74 6f 72 20 66 6f 72 | 20 69 6e 74 65 72 6e 61 |ctor for| interna|
|00003fd0| 6c 20 75 73 65 0d 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |l use..-|--------|
|00003fe0| 2d 2d 2d 2d 2d 2d 2d 20 | 62 61 63 6b 62 75 72 6e |------- |backburn|
|00003ff0| 65 72 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |er -----|--------|
|00004000| 2d 2d 2d 2d 2d 0d 6d 61 | 63 72 6f 20 54 61 62 6c |-----.ma|cro Tabl|
|00004010| 65 69 6e 73 65 72 74 20 | 4c 69 6e 65 2c 20 43 6f |einsert |Line, Co|
|00004020| 6c 75 6d 6e 2c 45 6e 74 | 72 79 0d 73 65 74 20 43 |lumn,Ent|ry.set C|
|00004030| 68 61 72 73 50 65 72 43 | 6f 6c 75 6d 6e 20 3d 20 |harsPerC|olumn = |
|00004040| 31 30 20 2d 2d 20 35 20 | 64 69 67 69 74 73 2c 20 |10 -- 5 |digits, |
|00004050| 31 20 64 65 63 2e 2c 20 | 34 20 73 70 61 63 65 73 |1 dec., |4 spaces|
|00004060| 0d 2d 2d 73 65 74 20 43 | 68 61 72 73 50 65 72 4c |.--set C|harsPerL|
|00004070| 69 6e 65 20 3d 20 43 68 | 61 72 73 50 65 72 43 6f |ine = Ch|arsPerCo|
|00004080| 6c 75 6d 6e 20 2a 20 34 | 20 2b 20 32 20 2d 2d 20 |lumn * 4| + 2 -- |
|00004090| 20 70 65 72 20 6c 69 6e | 65 20 2b 20 73 70 61 63 | per lin|e + spac|
|000040a0| 65 72 20 6c 69 6e 65 27 | 73 20 72 65 74 75 72 6e |er line'|s return|
|000040b0| 0d 20 2d 2d 20 70 61 64 | 64 20 6f 72 20 74 72 75 |. -- pad|d or tru|
|000040c0| 6e 63 20 74 6f 20 43 68 | 61 72 73 50 65 72 43 6f |nc to Ch|arsPerCo|
|000040d0| 6c 75 6d 6e 20 63 68 61 | 72 73 0d 69 66 20 43 6f |lumn cha|rs.if Co|
|000040e0| 6c 75 6d 6e 20 3c 20 34 | 20 74 68 65 6e 20 73 65 |lumn < 4| then se|
|000040f0| 74 20 45 6e 74 72 79 20 | 3d 20 63 68 61 72 73 28 |t Entry |= chars(|
|00004100| 45 6e 74 72 79 20 26 20 | 22 20 20 20 20 20 20 20 |Entry & |" |
|00004110| 20 20 20 22 2c 31 2c 43 | 68 61 72 73 50 65 72 43 | ",1,C|harsPerC|
|00004120| 6f 6c 75 6d 6e 29 20 2d | 2d 20 70 61 64 0d 65 6c |olumn) -|- pad.el|
|00004130| 73 65 20 73 65 74 20 45 | 6e 74 72 79 20 3d 20 63 |se set E|ntry = c|
|00004140| 68 61 72 73 28 45 6e 74 | 72 79 20 26 20 22 20 20 |hars(Ent|ry & " |
|00004150| 20 20 20 20 20 20 20 20 | 22 2c 31 2c 43 68 61 72 | |",1,Char|
|00004160| 73 50 65 72 43 6f 6c 75 | 6d 6e 29 20 2d 2d 20 64 |sPerColu|mn) -- d|
|00004170| 6f 6e 27 74 20 70 61 64 | 20 6c 61 73 74 20 63 6f |on't pad| last co|
|00004180| 6c 2e 0d 73 65 74 20 54 | 68 65 54 62 6c 20 3d 20 |l..set T|heTbl = |
|00004190| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|000041a0| 20 41 32 34 0d 2d 2d 73 | 65 74 20 74 68 65 20 74 | A24.--s|et the t|
|000041b0| 65 78 74 20 6f 66 20 63 | 61 73 74 20 41 32 34 20 |ext of c|ast A24 |
|000041c0| 3d 20 4f 76 65 72 4c 61 | 79 54 78 74 28 54 68 65 |= OverLa|yTxt(The|
|000041d0| 54 62 6c 2c 45 6e 74 72 | 79 2c 4c 69 6e 65 2c 43 |Tbl,Entr|y,Line,C|
|000041e0| 6f 6c 75 6d 6e 20 2a 20 | 43 68 61 72 73 50 65 72 |olumn * |CharsPer|
|000041f0| 43 6f 6c 75 6d 6e 29 0d | 43 41 55 54 49 4f 4e 20 |Column).|CAUTION |
|00004200| 4f 76 65 72 4c 61 79 54 | 78 74 20 58 46 43 4e 20 |OverLayT|xt XFCN |
|00004210| 62 6f 6d 62 73 20 28 68 | 79 70 65 72 62 61 73 69 |bombs (h|yperbasi|
|00004220| 63 29 0d 0d 6d 61 63 72 | 6f 20 4c 69 6e 67 6f 54 |c)..macr|o LingoT|
|00004230| 61 62 6c 65 69 6e 73 65 | 72 74 20 4c 69 6e 65 2c |ableinse|rt Line,|
|00004240| 20 43 6f 6c 75 6d 6e 2c | 45 6e 74 72 79 0d 73 65 | Column,|Entry.se|
|00004250| 74 20 43 68 61 72 73 50 | 65 72 43 6f 6c 75 6d 6e |t CharsP|erColumn|
|00004260| 20 3d 20 31 30 20 2d 2d | 20 35 20 64 69 67 69 74 | = 10 --| 5 digit|
|00004270| 73 2c 20 31 20 64 65 63 | 2e 2c 20 34 20 73 70 61 |s, 1 dec|., 4 spa|
|00004280| 63 65 73 0d 2d 2d 73 65 | 74 20 43 68 61 72 73 50 |ces.--se|t CharsP|
|00004290| 65 72 4c 69 6e 65 20 3d | 20 43 68 61 72 73 50 65 |erLine =| CharsPe|
|000042a0| 72 43 6f 6c 75 6d 6e 20 | 2a 20 34 20 2b 20 32 20 |rColumn |* 4 + 2 |
|000042b0| 2d 2d 20 20 70 65 72 20 | 6c 69 6e 65 20 2b 20 73 |-- per |line + s|
|000042c0| 70 61 63 65 72 20 6c 69 | 6e 65 27 73 20 72 65 74 |pacer li|ne's ret|
|000042d0| 75 72 6e 0d 20 2d 2d 20 | 70 61 64 64 20 6f 72 20 |urn. -- |padd or |
|000042e0| 74 72 75 6e 63 20 74 6f | 20 43 68 61 72 73 50 65 |trunc to| CharsPe|
|000042f0| 72 43 6f 6c 75 6d 6e 20 | 63 68 61 72 73 0d 69 66 |rColumn |chars.if|
|00004300| 20 43 6f 6c 75 6d 6e 20 | 3c 20 34 20 74 68 65 6e | Column |< 4 then|
|00004310| 20 73 65 74 20 45 6e 74 | 72 79 20 3d 20 63 68 61 | set Ent|ry = cha|
|00004320| 72 73 28 45 6e 74 72 79 | 20 26 20 22 20 20 20 20 |rs(Entry| & " |
|00004330| 20 20 20 20 20 20 22 2c | 31 2c 43 68 61 72 73 50 | ",|1,CharsP|
|00004340| 65 72 43 6f 6c 75 6d 6e | 29 20 2d 2d 20 70 61 64 |erColumn|) -- pad|
|00004350| 0d 65 6c 73 65 20 73 65 | 74 20 45 6e 74 72 79 20 |.else se|t Entry |
|00004360| 3d 20 63 68 61 72 73 28 | 45 6e 74 72 79 20 26 20 |= chars(|Entry & |
|00004370| 22 20 20 20 20 20 20 20 | 20 20 20 22 2c 31 2c 43 |" | ",1,C|
|00004380| 68 61 72 73 50 65 72 43 | 6f 6c 75 6d 6e 29 20 2d |harsPerC|olumn) -|
|00004390| 2d 20 64 6f 6e 27 74 20 | 70 61 64 20 6c 61 73 74 |- don't |pad last|
|000043a0| 20 63 6f 6c 2e 0d 73 65 | 74 20 54 68 65 54 62 6c | col..se|t TheTbl|
|000043b0| 20 3d 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 63 | = the t|ext of c|
|000043c0| 61 73 74 20 41 32 34 0d | 73 65 74 20 45 6e 74 72 |ast A24.|set Entr|
|000043d0| 79 53 74 61 72 74 20 3d | 20 30 0d 73 65 74 20 54 |yStart =| 0.set T|
|000043e0| 62 6c 4c 65 6e 67 74 68 | 20 3d 20 6c 65 6e 67 74 |blLength| = lengt|
|000043f0| 68 28 54 68 65 54 62 6c | 29 0d 2d 2d 20 69 64 65 |h(TheTbl|).-- ide|
|00004400| 6e 74 69 66 79 20 53 74 | 61 72 74 20 61 6e 64 20 |ntify St|art and |
|00004410| 65 6e 64 20 6f 66 20 63 | 68 61 72 23 73 20 6f 66 |end of c|har#s of|
|00004420| 20 6c 69 6e 65 0d 73 65 | 74 20 69 20 3d 20 31 0d | line.se|t i = 1.|
|00004430| 72 65 70 65 61 74 20 77 | 68 69 6c 65 20 69 20 3c |repeat w|hile i <|
|00004440| 3d 20 4c 69 6e 65 20 2d | 2d 20 63 6f 75 6e 74 20 |= Line -|- count |
|00004450| 70 61 73 74 20 72 65 74 | 75 72 6e 73 0d 20 20 20 |past ret|urns. |
|00004460| 20 73 65 74 20 45 6e 74 | 72 79 53 74 61 72 74 20 | set Ent|ryStart |
|00004470| 3d 45 6e 74 72 79 53 74 | 61 72 74 20 2b 20 6f 66 |=EntrySt|art + of|
|00004480| 66 73 65 74 28 72 65 74 | 75 72 6e 2c 20 63 68 61 |fset(ret|urn, cha|
|00004490| 72 73 28 54 68 65 54 62 | 6c 2c 45 6e 74 72 79 53 |rs(TheTb|l,EntryS|
|000044a0| 74 61 72 74 20 2b 20 31 | 2c 54 62 6c 4c 65 6e 67 |tart + 1|,TblLeng|
|000044b0| 74 68 29 29 0d 70 75 74 | 20 22 6c 69 6e 65 20 22 |th)).put| "line "|
|000044c0| 26 20 69 20 26 22 20 20 | 73 74 61 72 74 40 20 22 |& i &" |start@ "|
|000044d0| 26 45 6e 74 72 79 53 74 | 61 72 74 20 2d 2d 24 24 |&EntrySt|art --$$|
|000044e0| 24 0d 73 65 74 20 69 20 | 3d 20 69 20 2b 20 31 0d |$.set i |= i + 1.|
|000044f0| 65 6e 64 20 72 65 70 65 | 61 74 0d 65 78 69 74 20 |end repe|at.exit |
|00004500| 2d 2d 24 24 24 0d 73 65 | 74 20 45 6e 74 72 79 53 |--$$$.se|t EntryS|
|00004510| 74 61 72 74 20 3d 20 28 | 4c 69 6e 65 20 2d 20 31 |tart = (|Line - 1|
|00004520| 29 20 2a 20 43 68 61 72 | 73 50 65 72 4c 69 6e 65 |) * Char|sPerLine|
|00004530| 20 2b 20 28 43 6f 6c 75 | 6d 6e 20 2d 20 31 29 20 | + (Colu|mn - 1) |
|00004540| 2a 20 43 68 61 72 73 50 | 65 72 43 6f 6c 75 6d 6e |* CharsP|erColumn|
|00004550| 0d 73 65 74 20 54 68 65 | 54 62 6c 20 3d 20 63 68 |.set The|Tbl = ch|
|00004560| 61 72 73 28 54 68 65 54 | 62 6c 2c 31 2c 45 6e 74 |ars(TheT|bl,1,Ent|
|00004570| 72 79 53 74 61 72 74 29 | 20 26 20 45 6e 74 72 79 |ryStart)| & Entry|
|00004580| 20 c2 0d 26 63 68 61 72 | 73 28 54 68 65 54 62 6c | ..&char|s(TheTbl|
|00004590| 2c 45 6e 74 72 79 53 74 | 61 72 74 20 2b 20 31 20 |,EntrySt|art + 1 |
|000045a0| 2b 20 43 68 61 72 73 50 | 65 72 43 6f 6c 75 6d 6e |+ CharsP|erColumn|
|000045b0| 2c 6c 65 6e 67 74 68 28 | 54 68 65 54 62 6c 29 29 |,length(|TheTbl))|
|000045c0| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|000045d0| 20 63 61 73 74 20 41 32 | 34 20 3d 20 54 68 65 54 | cast A2|4 = TheT|
|000045e0| 62 6c 0d 0d 2d 2d 0d 6d | 61 63 72 6f 20 41 6e 73 |bl..--.m|acro Ans|
|000045f0| 77 65 72 44 65 6d 6f 0d | 2d 2d 70 75 74 20 6d 6f |werDemo.|--put mo|
|00004600| 64 61 6c 44 69 61 6c 6f | 67 28 22 74 65 73 74 22 |dalDialo|g("test"|
|00004610| 2c 74 68 65 20 74 65 78 | 74 20 6f 66 20 63 61 73 |,the tex|t of cas|
|00004620| 74 20 41 33 36 29 20 2d | 2d 20 58 46 43 4e 2c 44 |t A36) -|- XFCN,D|
|00004630| 4c 4f 47 0d 70 75 74 20 | 6d 6f 64 61 6c 44 69 61 |LOG.put |modalDia|
|00004640| 6c 6f 67 28 22 61 6e 73 | 77 65 72 78 78 22 2c 20 |log("ans|werxx", |
|00004650| 22 64 65 66 61 75 6c 74 | 2c 54 68 69 73 20 69 73 |"default|,This is|
|00004660| 20 69 74 22 20 26 20 72 | 65 74 75 72 6e 20 26 22 | it" & r|eturn &"|
|00004670| 63 61 6e 63 65 6c 2c 52 | 65 2d 45 6e 74 65 72 22 |cancel,R|e-Enter"|
|00004680| 20 20 26 20 72 65 74 75 | 72 6e 20 26 20 22 41 72 | & retu|rn & "Ar|
|00004690| 65 20 79 6f 75 20 73 68 | 75 72 65 20 31 32 2e 34 |e you sh|ure 12.4|
|000046a0| 35 20 69 73 20 69 74 3f | 22 29 0d 0d 6d 61 63 72 |5 is it?|")..macr|
|000046b0| 6f 20 54 69 6e 79 44 65 | 6d 6f 0d 70 75 74 20 6d |o TinyDe|mo.put m|
|000046c0| 6f 64 61 6c 44 69 61 6c | 6f 67 28 22 74 69 6e 79 |odalDial|og("tiny|
|000046d0| 31 22 2c 22 31 32 33 2e | 37 38 2c 73 65 6c 65 63 |1","123.|78,selec|
|000046e0| 74 22 29 20 2d 2d 20 58 | 46 43 4e 2c 44 4c 4f 47 |t") -- X|FCN,DLOG|
|000046f0| 0d 0d 6d 61 63 72 6f 20 | 41 73 6b 44 65 6d 6f 0d |..macro |AskDemo.|
|00004700| 70 75 74 20 6d 6f 64 61 | 6c 44 69 61 6c 6f 67 28 |put moda|lDialog(|
|00004710| 22 61 73 6b 22 2c 20 22 | 54 68 69 73 20 69 73 20 |"ask", "|This is |
|00004720| 69 74 22 20 26 20 72 65 | 74 75 72 6e 20 26 22 63 |it" & re|turn &"c|
|00004730| 61 6e 63 65 6c 2c 43 61 | 6e 63 65 6c 22 20 20 26 |ancel,Ca|ncel" &|
|00004740| 20 72 65 74 75 72 6e 20 | 26 20 22 41 72 65 20 79 | return |& "Are y|
|00004750| 6f 75 20 73 68 75 72 65 | 20 74 68 69 73 20 69 73 |ou shure| this is|
|00004760| 20 74 68 65 20 69 6e 69 | 74 69 61 6c 20 76 6f 6c | the ini|tial vol|
|00004770| 75 6d 65 20 72 65 61 64 | 69 6e 67 22 20 26 20 72 |ume read|ing" & r|
|00004780| 65 74 75 72 6e 20 26 20 | 22 31 32 33 2e 34 35 22 |eturn & |"123.45"|
|00004790| 29 0d 0d 6d 61 63 72 6f | 20 4d 6f 72 65 44 65 6d |)..macro| MoreDem|
|000047a0| 6f 0d 70 75 74 20 6d 6f | 64 61 6c 44 69 61 6c 6f |o.put mo|dalDialo|
|000047b0| 67 28 22 4d 6f 72 65 31 | 22 2c 20 74 68 65 20 74 |g("More1|", the t|
|000047c0| 65 78 74 20 6f 66 20 63 | 61 73 74 20 61 33 37 20 |ext of c|ast a37 |
|000047d0| 26 20 72 65 74 75 72 6e | 20 26 22 63 61 6e 63 65 |& return| &"cance|
|000047e0| 6c 2c 43 61 6e 63 65 6c | 22 20 20 26 20 72 65 74 |l,Cancel|" & ret|
|000047f0| 75 72 6e 20 26 20 22 41 | 72 65 20 79 6f 75 20 73 |urn & "A|re you s|
|00004800| 68 75 72 65 20 74 68 69 | 73 20 69 73 20 74 68 65 |hure thi|s is the|
|00004810| 20 69 6e 69 74 69 61 6c | 20 76 6f 6c 75 6d 65 20 | initial| volume |
|00004820| 72 65 61 64 69 6e 67 22 | 20 26 20 72 65 74 75 72 |reading"| & retur|
|00004830| 6e 20 26 20 22 31 32 33 | 2e 34 35 22 29 0d 0d 0d |n & "123|.45")...|
|00004840| 0d 6d 61 63 72 6f 20 70 | 74 65 73 74 0d 0d 67 6c |.macro p|test..gl|
|00004850| 6f 62 61 6c 20 48 61 6e | 64 6c 65 72 0d 69 66 20 |obal Han|dler.if |
|00004860| 6e 6f 74 20 6f 62 6a 65 | 63 74 70 28 48 61 6e 64 |not obje|ctp(Hand|
|00004870| 6c 65 72 29 20 74 68 65 | 6e 0d 73 65 74 20 48 61 |ler) the|n.set Ha|
|00004880| 6e 64 6c 65 72 20 3d 20 | 48 61 6e 64 6c 65 72 4d |ndler = |HandlerM|
|00004890| 61 6b 65 72 28 6d 6e 65 | 77 29 0d 65 6e 64 20 69 |aker(mne|w).end i|
|000048a0| 66 0d 73 65 74 43 61 6c | 6c 42 61 63 6b 20 70 72 |f.setCal|lBack pr|
|000048b0| 6f 6d 70 74 2c 68 61 6e | 64 6c 65 72 0d 70 72 6f |ompt,han|dler.pro|
|000048c0| 6d 70 74 20 31 2c 20 22 | 50 6c 65 61 73 65 20 65 |mpt 1, "|Please e|
|000048d0| 6e 74 65 72 20 69 6e 69 | 74 69 61 6c 20 76 6f 6c |nter ini|tial vol|
|000048e0| 75 6d 65 2c 20 74 68 65 | 6e 20 63 6c 69 63 6b 20 |ume, the|n click |
|000048f0| 27 45 6e 74 72 79 20 63 | 6f 6d 70 6c 65 74 65 27 |'Entry c|omplete'|
|00004900| 22 2c 35 30 0d 0d 66 61 | 63 74 6f 72 79 20 48 61 |",50..fa|ctory Ha|
|00004910| 6e 64 6c 65 72 4d 61 6b | 65 72 0d 0d 6d 65 74 68 |ndlerMak|er..meth|
|00004920| 6f 64 20 6d 6e 65 77 0d | 0d 6d 65 74 68 6f 64 20 |od mnew.|.method |
|00004930| 6d 45 76 61 6c 45 78 70 | 72 20 69 74 0d 69 66 20 |mEvalExp|r it.if |
|00004940| 69 74 20 3d 20 22 74 6f | 70 20 6f 66 20 77 69 6e |it = "to|p of win|
|00004950| 64 6f 77 22 20 74 68 65 | 6e 0d 20 20 20 20 72 65 |dow" the|n. re|
|00004960| 74 75 72 6e 20 74 68 65 | 20 73 74 61 67 65 54 6f |turn the| stageTo|
|00004970| 70 0d 65 6c 73 65 0d 69 | 66 20 69 74 20 3d 20 22 |p.else.i|f it = "|
|00004980| 68 65 69 67 68 74 20 6f | 66 20 77 69 6e 64 6f 77 |height o|f window|
|00004990| 22 20 74 68 65 6e 0d 20 | 20 20 20 72 65 74 75 72 |" then. | retur|
|000049a0| 6e 20 74 68 65 20 73 74 | 61 67 65 62 6f 74 74 6f |n the st|agebotto|
|000049b0| 6d 20 2d 20 74 68 65 20 | 73 74 61 67 65 54 6f 70 |m - the |stageTop|
|000049c0| 0d 65 6c 73 65 0d 20 20 | 20 20 69 66 20 69 74 20 |.else. | if it |
|000049d0| 3d 20 22 4c 65 66 74 20 | 6f 66 20 77 69 6e 64 6f |= "Left |of windo|
|000049e0| 77 22 20 74 68 65 6e 0d | 20 20 20 20 72 65 74 75 |w" then.| retu|
|000049f0| 72 6e 20 74 68 65 20 73 | 74 61 67 65 4c 65 66 74 |rn the s|tageLeft|
|00004a00| 0d 20 20 20 20 65 6c 73 | 65 0d 20 20 20 20 61 6c |. els|e. al|
|00004a10| 65 72 74 20 22 6d 45 76 | 61 6c 45 78 70 72 3a 20 |ert "mEv|alExpr: |
|00004a20| 22 26 20 69 74 0d 20 20 | 20 20 65 6e 64 20 69 66 |"& it. | end if|
|00004a30| 20 20 20 20 0d 65 6e 64 | 20 69 66 0d 0d 6d 65 74 | .end| if..met|
|00004a40| 68 6f 64 20 6d 53 65 6e | 64 48 43 4d 65 73 73 61 |hod mSen|dHCMessa|
|00004a50| 67 65 20 69 74 0d 69 66 | 20 69 74 20 3d 20 22 67 |ge it.if| it = "g|
|00004a60| 6f 20 74 68 69 73 20 63 | 61 72 64 22 20 74 68 65 |o this c|ard" the|
|00004a70| 6e 20 70 75 74 20 22 67 | 6f 20 74 68 69 73 20 63 |n put "g|o this c|
|00004a80| 61 72 64 2e 2e 2e 20 74 | 69 6d 65 20 74 6f 20 75 |ard... t|ime to u|
|00004a90| 70 64 61 74 65 73 74 61 | 67 65 3f 22 0d 65 6c 73 |pdatesta|ge?".els|
|00004aa0| 65 20 61 6c 65 72 74 20 | 22 6d 53 65 6e 64 48 43 |e alert |"mSendHC|
|00004ab0| 4d 65 73 73 61 67 65 3a | 20 22 26 20 69 74 0d 0d |Message:| "& it..|
|00004ac0| 2d 2d 20 65 78 74 72 61 | 73 20 28 20 75 6e 75 73 |-- extra|s ( unus|
|00004ad0| 65 64 20 68 65 72 65 20 | 29 20 2d 2d 0d 6d 65 74 |ed here |) --.met|
|00004ae0| 68 6f 64 20 6d 53 65 6e | 64 43 61 72 64 4d 65 73 |hod mSen|dCardMes|
|00004af0| 73 61 67 65 20 69 74 0d | 61 6c 65 72 74 20 22 6d |sage it.|alert "m|
|00004b00| 53 65 6e 64 43 61 72 64 | 4d 65 73 73 61 67 65 3a |SendCard|Message:|
|00004b10| 20 22 26 20 69 74 0d 0d | 6d 65 74 68 6f 64 20 6d | "& it..|method m|
|00004b20| 47 65 74 46 69 65 6c 64 | 42 79 4e 61 6d 65 20 69 |GetField|ByName i|
|00004b30| 74 0d 61 6c 65 72 74 20 | 22 6d 47 65 74 46 69 65 |t.alert |"mGetFie|
|00004b40| 6c 64 42 79 4e 61 6d 65 | 3a 20 22 26 20 69 74 0d |ldByName|: "& it.|
|00004b50| 0d 6d 65 74 68 6f 64 20 | 6d 47 65 74 46 69 65 6c |.method |mGetFiel|
|00004b60| 64 42 79 4e 75 6d 20 69 | 74 0d 61 6c 65 72 74 20 |dByNum i|t.alert |
|00004b70| 22 6d 47 65 74 46 69 65 | 6c 64 42 79 4e 75 6d 3a |"mGetFie|ldByNum:|
|00004b80| 20 22 26 20 69 74 0d 0d | 6d 65 74 68 6f 64 20 6d | "& it..|method m|
|00004b90| 47 65 74 46 69 65 6c 64 | 42 79 49 44 20 69 74 0d |GetField|ByID it.|
|00004ba0| 61 6c 65 72 74 20 22 6d | 47 65 74 46 69 65 6c 64 |alert "m|GetField|
|00004bb0| 42 79 49 44 3a 20 22 26 | 20 69 74 0d 0d 6d 65 74 |ByID: "&| it..met|
|00004bc0| 68 6f 64 20 6d 53 65 74 | 46 69 65 6c 64 42 79 4e |hod mSet|FieldByN|
|00004bd0| 61 6d 65 20 69 74 0d 61 | 6c 65 72 74 20 22 6d 53 |ame it.a|lert "mS|
|00004be0| 65 74 46 69 65 6c 64 42 | 79 4e 61 6d 65 3a 20 22 |etFieldB|yName: "|
|00004bf0| 26 20 69 74 0d 0d 6d 65 | 74 68 6f 64 20 6d 53 65 |& it..me|thod mSe|
|00004c00| 74 46 69 65 6c 64 42 79 | 4e 75 6d 20 69 74 0d 61 |tFieldBy|Num it.a|
|00004c10| 6c 65 72 74 20 22 6d 53 | 65 74 46 69 65 6c 64 42 |lert "mS|etFieldB|
|00004c20| 79 4e 75 6d 3a 20 22 26 | 20 69 74 0d 0d 6d 65 74 |yNum: "&| it..met|
|00004c30| 68 6f 64 20 6d 53 65 74 | 46 69 65 6c 64 42 79 49 |hod mSet|FieldByI|
|00004c40| 44 20 69 74 0d 61 6c 65 | 72 74 20 22 6d 53 65 74 |D it.ale|rt "mSet|
|00004c50| 46 69 65 6c 64 42 79 49 | 44 3a 20 22 26 20 69 74 |FieldByI|D: "& it|
|00004c60| 0d 0d 0d 0d 0d 6d 61 63 | 72 6f 20 53 74 61 72 74 |.....mac|ro Start|
|00004c70| 54 72 69 61 6c 32 20 69 | 6e 64 69 63 61 74 6f 72 |Trial2 i|ndicator|
|00004c80| 0d 67 6c 6f 62 61 6c 20 | 50 69 63 74 75 72 65 50 |.global |PictureP|
|00004c90| 61 6c 65 74 74 65 2c 20 | 53 69 6d 50 61 6c 65 74 |alette, |SimPalet|
|00004ca0| 74 65 0d 69 66 20 69 6e | 64 69 63 61 74 6f 72 20 |te.if in|dicator |
|00004cb0| 3d 20 23 6d 65 74 68 79 | 6c 20 74 68 65 6e 0d 20 |= #methy|l then. |
|00004cc0| 20 20 20 73 65 74 20 50 | 69 63 74 75 72 65 50 61 | set P|icturePa|
|00004cd0| 6c 65 74 74 65 20 3d 20 | 22 74 69 74 72 61 74 65 |lette = |"titrate|
|00004ce0| 2e 70 69 63 74 2e 6d 65 | 74 68 6f 6c 22 0d 20 20 |.pict.me|thol". |
|00004cf0| 20 20 73 65 74 20 53 69 | 6d 50 61 6c 65 74 74 65 | set Si|mPalette|
|00004d00| 20 3d 20 22 6d 65 74 68 | 79 6c 20 72 65 64 22 0d | = "meth|yl red".|
|00004d10| 65 6c 73 65 0d 20 20 20 | 20 69 66 20 69 6e 64 69 |else. | if indi|
|00004d20| 63 61 74 6f 72 20 3d 20 | 23 70 68 65 6e 6f 6c 20 |cator = |#phenol |
|00004d30| 74 68 65 6e 0d 20 20 20 | 20 20 20 20 20 73 65 74 |then. | set|
|00004d40| 20 50 69 63 74 75 72 65 | 50 61 6c 65 74 74 65 20 | Picture|Palette |
|00004d50| 3d 20 22 74 69 74 72 61 | 74 69 6f 6e 2e 70 69 63 |= "titra|tion.pic|
|00004d60| 2e 70 68 79 6e 6f 6c 3f | 22 0d 20 20 20 20 20 20 |.phynol?|". |
|00004d70| 20 20 73 65 74 20 53 69 | 6d 50 61 6c 65 74 74 65 | set Si|mPalette|
|00004d80| 20 3d 20 22 70 68 79 6e | 6f 6c 3f 22 0d 20 20 20 | = "phyn|ol?". |
|00004d90| 20 65 6e 64 20 69 66 0d | 65 6e 64 20 69 66 0d 53 | end if.|end if.S|
|00004da0| 74 61 72 74 54 72 69 61 | 6c 0d 0d 6d 61 63 72 6f |tartTria|l..macro|
|00004db0| 20 53 63 61 6c 65 55 70 | 4e 75 6d 20 53 74 72 69 | ScaleUp|Num Stri|
|00004dc0| 6e 67 4e 75 6d 0d 67 6c | 6f 62 61 6c 20 4e 75 6d |ngNum.gl|obal Num|
|00004dd0| 58 31 30 30 2c 20 46 72 | 61 63 74 44 69 67 69 74 |X100, Fr|actDigit|
|00004de0| 73 0d 00 1d 00 00 00 00 | 00 10 00 0c 00 03 00 00 |s.......|........|
|00004df0| 00 0c 00 00 00 00 00 00 | 00 00 00 2c 00 10 00 0c |........|...,....|
|00004e00| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 00 39 |........|.......9|
|00004e10| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00004e20| 00 00 02 52 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...R....|........|
|00004e30| 00 00 00 00 00 00 02 61 | 00 10 00 0c 00 03 00 00 |.......a|........|
|00004e40| 00 0c 00 00 00 00 00 00 | 00 00 03 b7 00 10 00 0c |........|........|
|00004e50| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 03 c4 |........|........|
|00004e60| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00004e70| 00 00 04 9c 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00004e80| 00 00 00 00 00 00 04 ab | 00 10 00 0c 00 03 00 00 |........|........|
|00004e90| 00 0c 00 00 00 00 00 00 | 00 00 06 e9 00 10 00 0c |........|........|
|00004ea0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 06 f5 |........|........|
|00004eb0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00004ec0| 00 00 0c 2c 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...,....|........|
|00004ed0| 00 00 00 00 00 00 0c 3a | 00 10 00 0c 00 03 00 00 |.......:|........|
|00004ee0| 00 0c 00 00 00 00 00 00 | 00 00 0d 4b 00 10 00 0c |........|...K....|
|00004ef0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 0d 61 |........|.......a|
|00004f00| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00004f10| 00 00 0d 8e 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00004f20| 00 00 00 00 00 00 0d 9b | 00 10 00 0c 00 03 00 00 |........|........|
|00004f30| 00 0c 00 00 00 00 00 00 | 00 00 0e 4d 00 10 00 0c |........|...M....|
|00004f40| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 0e 5b |........|.......[|
|00004f50| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00004f60| 00 00 11 73 00 10 00 0c | 00 03 01 00 00 0c 00 00 |...s....|........|
|00004f70| 00 00 00 00 00 00 11 81 | 00 10 00 0c 00 03 00 00 |........|........|
|00004f80| 00 0c 00 00 00 00 00 00 | 00 00 13 49 00 10 00 0c |........|...I....|
|00004f90| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 13 57 |........|.......W|
|00004fa0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00004fb0| 00 00 14 d8 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00004fc0| 00 00 00 00 00 00 14 ea | 00 10 00 0c 00 03 00 00 |........|........|
|00004fd0| 00 0c 00 00 00 00 00 00 | 00 00 15 90 00 10 00 0c |........|........|
|00004fe0| 00 03 01 00 00 0c 00 00 | 00 00 00 00 00 00 15 9b |........|........|
|00004ff0| 00 10 00 0c 00 03 00 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00005000| 00 00 17 ae 00 10 00 0c | 00 03 01 00 00 0c 00 00 |........|........|
|00005010| 00 00 00 00 00 00 17 be | 00 10 00 0c 00 03 00 00 |........|........|
|00005020| 00 0c 00 00 00 00 00 00 | 00 00 00 36 00 00 00 0c |........|...6....|
|00005030| 00 00 00 14 00 00 00 16 | 43 6c 69 63 6b 20 6f 6e |........|Click on|
|00005040| 20 61 20 73 65 6c 65 63 | 74 69 6f 6e 00 01 00 00 | a selec|tion....|
|00005050| 00 00 00 0f 00 0b 00 15 | 01 00 00 0e 00 00 00 00 |........|........|
|00005060| 33 33 00 00 00 26 00 00 | 00 0c 00 00 00 04 00 00 |33...&..|........|
|00005070| 00 16 34 2e 33 37 00 01 | 00 00 00 00 00 20 00 19 |..4.37..|..... ..|
|00005080| 00 96 00 00 00 18 66 6e | 66 6e 66 6e 00 00 01 67 |......fn|fnfn...g|
|00005090| 00 00 00 0c 00 00 01 09 | 00 00 00 52 20 20 53 74 |........|...R St|
|000050a0| 61 6e 64 61 72 64 69 7a | 61 74 69 6f 6e 20 70 72 |andardiz|ation pr|
|000050b0| 6f 63 65 64 75 72 65 20 | 6e 6f 74 20 69 6e 63 6c |ocedure |not incl|
|000050c0| 75 64 65 64 20 69 6e 20 | 74 68 69 73 20 64 65 6d |uded in |this dem|
|000050d0| 6f 6e 73 74 61 74 69 6f | 6e 20 70 61 63 6b 61 67 |onstatio|n packag|
|000050e0| 65 2e 0d 20 54 68 69 73 | 20 69 73 20 61 20 73 63 |e.. This| is a sc|
|000050f0| 72 65 65 6e 20 22 73 6e | 61 70 73 68 6f 74 22 20 |reen "sn|apshot" |
|00005100| 6f 66 20 74 68 65 20 73 | 69 6d 75 6c 61 74 65 64 |of the s|imulated|
|00005110| 20 6c 61 62 6f 72 61 74 | 6f 72 79 20 6e 6f 74 65 | laborat|ory note|
|00005120| 62 6f 6f 6b 20 69 6e 20 | 77 68 69 63 68 20 74 68 |book in |which th|
|00005130| 65 20 73 74 75 64 65 6e | 74 20 65 6e 74 65 72 73 |e studen|t enters|
|00005140| 20 74 68 65 20 64 61 74 | 61 20 6f 66 20 66 6f 75 | the dat|a of fou|
|00005150| 72 20 73 65 70 61 72 61 | 74 65 20 74 72 69 61 6c |r separa|te trial|
|00005160| 73 20 61 6e 64 20 63 6f | 6d 70 75 74 65 73 20 74 |s and co|mputes t|
|00005170| 68 65 20 72 65 73 75 6c | 74 73 2e 0d 20 28 74 68 |he resul|ts.. (th|
|00005180| 69 73 20 65 78 61 6d 70 | 6c 65 20 68 61 73 20 6a |is examp|le has j|
|00005190| 75 73 74 20 73 74 61 72 | 74 65 64 20 74 72 69 61 |ust star|ted tria|
|000051a0| 6c 20 34 29 2e 00 04 00 | 00 00 00 00 10 00 0c 00 |l 4)....|........|
|000051b0| 03 01 00 00 0c 00 00 00 | 00 88 88 00 00 00 01 00 |........|........|
|000051c0| 10 00 0c 00 03 01 00 00 | 0c 55 55 00 00 00 00 00 |........|.UU.....|
|000051d0| 00 00 46 00 10 00 0c 00 | 03 01 00 00 0c 00 00 00 |..F.....|........|
|000051e0| 00 88 88 00 00 00 48 00 | 10 00 0c 00 03 01 00 00 |......H.|........|
|000051f0| 0c 00 00 00 00 66 66 00 | 00 00 a4 00 00 00 0c 00 |.....ff.|........|
|00005200| 00 00 82 00 00 00 16 36 | 37 38 20 20 20 20 20 20 |.......6|78 |
|00005210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 0d | | .|
|00005220| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00005230| 20 20 20 20 20 20 20 20 | 20 0d 0d 20 20 20 20 20 | | .. |
|00005240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005250| 20 20 20 0d 0d 20 20 20 | 20 20 20 20 20 20 20 20 | .. | |
|00005260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 0d 0d 20 | | .. |
|00005270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005280| 20 20 20 20 20 20 20 0d | 0d 00 01 00 00 00 00 00 | .|........|
|00005290| 10 00 0c 00 04 00 00 00 | 0c 00 00 44 44 00 00 00 |........|...DD...|
|000052a0| 00 00 25 00 00 00 0c 00 | 00 00 03 00 00 00 16 20 |..%.....|....... |
|000052b0| 0d 20 00 01 00 00 00 00 | 00 10 00 0c 00 03 01 00 |. ......|........|
|000052c0| 00 0c 00 00 00 00 88 88 | 00 00 00 1e 00 00 ff 00 |........|........|
|000052d0| 00 00 00 ff ff ff 00 00 | ff ff ff ff ff 00 00 ff |........|........|
|000052e0| ff ff 00 00 00 00 ff 00 | 00 00 00 00 00 27 00 00 |........|.....'..|
|000052f0| 00 0c 00 00 00 05 00 00 | 00 16 20 20 0d 20 20 00 |........|.. . .|
|00005300| 01 00 00 00 00 00 10 00 | 0c 00 03 01 00 00 0c 00 |........|........|
|00005310| 00 00 00 88 88 00 00 00 | 39 00 00 00 0c 00 00 00 |........|9.......|
|00005320| 17 00 00 00 16 41 62 6f | 76 65 20 45 71 75 69 76 |.....Abo|ve Equiv|
|00005330| 61 6c 65 6e 63 65 20 50 | 6f 69 6e 74 00 01 00 00 |alence P|oint....|
|00005340| 00 00 00 19 00 14 00 15 | 01 00 00 18 00 00 33 33 |........|......33|
|00005350| 66 66 00 00 00 36 00 00 | 00 0c 00 00 00 14 00 00 |ff...6..|........|
|00005360| 00 16 41 54 20 45 71 75 | 69 76 61 6c 65 6e 63 65 |..AT Equ|ivalence|
|00005370| 20 50 6f 69 6e 74 00 01 | 00 00 00 00 00 19 00 14 | Point..|........|
|00005380| 00 15 01 00 00 18 e3 af | e4 78 ff e7 00 00 00 2c |........|.x.....,|
|00005390| 00 00 00 0c 00 00 00 0a | 00 00 00 16 20 45 6e 64 |........|.... End|
|000053a0| 20 50 6f 69 6e 74 00 01 | 00 00 00 00 00 19 00 14 | Point..|........|
|000053b0| 00 15 01 00 00 18 00 00 | 33 33 66 66 00 00 00 d2 |........|33ff....|
|000053c0| 00 00 00 0c 00 00 00 b0 | 00 00 00 16 30 2e 37 33 |........|....0.73|
|000053d0| 31 36 67 20 20 30 2e 37 | 33 32 39 67 20 20 31 2e |16g 0.7|329g 1.|
|000053e0| 30 33 38 33 67 20 20 20 | 30 2e 39 38 35 34 67 0d |0383g |0.9854g.|
|000053f0| 0d 33 35 2e 34 32 20 20 | 20 20 20 20 33 32 2e 38 |.35.42 | 32.8|
|00005400| 32 20 20 20 20 20 20 34 | 34 2e 39 31 20 20 20 0d |2 4|4.91 .|
|00005410| 0d 20 37 2e 37 35 20 20 | 20 20 20 20 20 20 35 2e |. 7.75 | 5.|
|00005420| 31 33 20 20 20 20 20 20 | 20 20 35 2e 36 37 20 20 |13 | 5.67 |
|00005430| 20 20 20 20 20 20 31 2e | 32 38 0d 0d 32 37 2e 36 | 1.|28..27.6|
|00005440| 37 20 20 20 20 20 20 32 | 37 2e 36 39 20 20 20 20 |7 2|7.69 |
|00005450| 20 20 33 39 2e 32 34 20 | 20 20 20 0d 0d 30 2e 31 | 39.24 | ..0.1|
|00005460| 32 39 35 20 20 20 20 30 | 2e 31 32 39 36 20 20 20 |295 0|.1296 |
|00005470| 20 30 2e 31 32 39 36 20 | 20 20 20 20 00 01 00 00 | 0.1296 | ....|
|00005480| 00 00 00 10 00 0c 00 03 | 00 00 00 0c 00 00 44 44 |........|......DD|
|00005490| 00 00 00 00 00 2e 00 00 | 00 0c 00 00 00 0c 00 00 |........|........|
|000054a0| 00 16 49 6e 73 74 72 75 | 63 74 69 6f 6e 73 00 01 |..Instru|ctions..|
|000054b0| 00 00 00 00 00 18 00 12 | 00 0e 01 00 00 18 00 00 |........|........|
|000054c0| 00 00 00 00 00 00 00 20 | ff ff fe 00 ff ff fc 00 |....... |........|
|000054d0| 7f ff f8 00 7f ff f0 00 | 3f ff e0 00 1f ff c0 00 |........|?.......|
|000054e0| 0f ff 80 00 01 fc 00 00 | 00 00 00 60 ff ff ff ff |........|...`....|
|000054f0| ff f0 ff ff ff ff ff e0 | ff ff ff ff ff e0 7f ff |........|........|
|00005500| ff ff ff c0 3f ff ff ff | ff c0 3f ff ff ff ff 80 |....?...|..?.....|
|00005510| 1f ff ff ff ff 00 0f ff | ff ff fe 00 07 ff ff ff |........|........|
|00005520| fc 00 07 ff ff ff f8 00 | 03 ff ff ff f0 00 00 ff |........|........|
|00005530| ff ff e0 00 00 3f ff ff | 80 00 00 07 ff fe 00 00 |.....?..|........|
|00005540| 00 01 ff f8 00 00 00 00 | 3f c0 00 00 00 00 00 93 |........|?.......|
|00005550| fa ff 00 f0 fa ff 00 f0 | fa ff 00 f0 fa ff 00 e0 |........|........|
|00005560| fa ff 00 e0 fa ff 01 c0 | 7f fb ff 01 80 7f fb ff |........|........|
|00005570| 01 80 7f fb ff 01 00 7f | fb ff 01 00 3f fc ff 02 |........|....?...|
|00005580| fe 00 3f fc ff 02 fe 00 | 3f fc ff 02 fc 00 1f fc |..?.....|?.......|
|00005590| ff 02 f8 00 0f fc ff 02 | f8 00 07 fc ff 00 f0 01 |........|........|
|000055a0| 00 03 fc ff 02 e0 00 01 | fc ff 02 c0 00 00 fc ff |........|........|
|000055b0| fe 00 00 7f fe ff 00 fe | fe 00 00 1f fe ff 00 f8 |........|........|
|000055c0| fe 00 00 07 fe ff 00 e0 | fe 00 00 01 fe ff 00 c0 |........|........|
|000055d0| fd 00 02 3f ff ff fc 00 | 02 07 ff f8 fb 00 01 3f |...?....|.......?|
|000055e0| 80 fe 00 00 00 00 e7 f9 | ff 01 f8 00 f9 ff 01 f8 |........|........|
|000055f0| 00 f9 ff 02 f0 00 7f fa | ff 02 f0 00 7f fa ff 02 |........|........|
|00005600| f0 00 7f fa ff 02 f0 00 | 7f fa ff 02 f0 00 3f fa |........|......?.|
|00005610| ff 02 e0 00 3f fa ff 02 | e0 00 1f fa ff 02 e0 00 |....?...|........|
|00005620| 1f fa ff 02 e0 00 0f fa | ff 02 e0 00 0f fb ff 03 |........|........|
|00005630| ff c0 00 0f fa ff 02 80 | 00 07 fa ff 02 00 00 03 |........|........|
|00005640| fa ff 02 00 00 01 fb ff | 03 fe 00 00 01 fb ff 00 |........|........|
|00005650| fe fe 00 fb ff 00 fc fe | 00 fb ff 00 f8 fe 00 00 |........|........|
|00005660| 7f fc ff 00 f0 fe 00 00 | 3f fc ff 00 f0 fe 00 00 |........|?.......|
|00005670| 1f fc ff 00 e0 fe 00 00 | 0f fc ff 00 c0 fe 00 00 |........|........|
|00005680| 07 fc ff 00 80 fe 00 00 | 03 ff ff fe ff fd 00 00 |........|........|
|00005690| 01 fd ff 00 fe fc 00 fd | ff 00 fe fc 00 00 7f fe |........|........|
|000056a0| ff 00 fc fc 00 00 3f fe | ff 00 f8 fc 00 00 1f fe |......?.|........|
|000056b0| ff 00 f0 fc 00 00 0f fe | ff 00 e0 fc 00 00 03 fe |........|........|
|000056c0| ff fa 00 02 7f ff fc f9 | 00 01 ff f0 fd 00 00 00 |........|........|
|000056d0| 00 f9 f8 ff 00 c0 f8 ff | 00 c0 f8 ff 00 c0 f8 ff |........|........|
|000056e0| 00 c0 f8 ff 00 c0 f8 ff | 01 c0 7f f9 ff 01 c0 7f |........|........|
|000056f0| f9 ff 01 c0 7f f9 ff 01 | c0 7f f9 ff 01 c0 3f f9 |........|......?.|
|00005700| ff 01 80 3f f9 ff 01 80 | 3f fb ff 03 ff ff 00 1f |...?....|?.......|
|00005710| f9 ff 01 00 1f f9 ff 01 | 00 1f fa ff 02 fe 00 1f |........|........|
|00005720| fa ff 02 fc 00 0f fa ff | 02 fc 00 0f fa ff 02 fc |........|........|
|00005730| 00 07 fa ff 02 fc 00 07 | fa ff 02 f8 00 03 fa ff |........|........|
|00005740| 02 f8 00 03 fa ff 02 f0 | 00 01 fa ff 02 f0 00 00 |........|........|
|00005750| fa ff 02 e0 00 00 fe ff | fd ff 03 c0 00 00 7f fb |........|........|
|00005760| ff 03 c0 00 00 3f fb ff | 03 80 00 00 1f fb ff 03 |.....?..|........|
|00005770| 80 00 00 0f fb ff fe 00 | 00 0f fc ff 00 fe fe 00 |........|........|
|00005780| 00 03 fc ff 00 fc fe 00 | 00 01 fc ff 00 f8 fd 00 |........|........|
|00005790| fc ff 00 f0 fd 00 00 7f | fd ff 00 e0 fd 00 00 3f |........|.......?|
|000057a0| fd ff 00 80 fd 00 00 0f | fe ff 00 fe fc 00 00 03 |........|........|
|000057b0| fe ff 00 fc fd 00 01 00 | 00 fe ff 00 c0 fb 00 02 |........|........|
|000057c0| 3f ff ff fa 00 02 0f ff | f0 fd 00 00 00 00 fc f8 |?.......|........|
|000057d0| ff 00 fc f8 ff 00 fc f8 | ff 00 fc f8 ff 00 fc f8 |........|........|
|000057e0| ff 00 fc f8 ff 00 fc f8 | ff 00 fc f8 ff 00 fc f8 |........|........|
|000057f0| ff 00 fc f8 ff 00 fc f8 | ff 00 fc f8 ff 00 fc fa |........|........|
|00005800| ff 02 ff ff fc f8 ff 00 | fc f8 ff 01 fc 7f f9 ff |........|........|
|00005810| 01 fc 7f f9 ff 01 fc 7f | f9 ff 01 fc 7f f9 ff 01 |........|........|
|00005820| fc 3f f9 ff 01 fc 3f f9 | ff 01 fc 3f f9 ff 01 f8 |.?....?.|...?....|
|00005830| 3f f9 ff 01 f8 3f f9 ff | 01 f8 1f f9 ff 01 f0 0f |?....?..|........|
|00005840| fe ff fc ff 01 f0 0f f9 | ff 01 e0 07 f9 ff 01 e0 |........|........|
|00005850| 07 f9 ff 01 c0 03 f9 ff | 01 80 01 f9 ff 01 00 01 |........|........|
|00005860| fa ff 02 fe 00 00 fa ff | 03 fc 00 00 7f fb ff 03 |........|........|
|00005870| f8 00 00 3f fb ff 03 f0 | 00 00 1f fb ff 03 e0 00 |...?....|........|
|00005880| 00 0f fb ff 03 c0 00 00 | 07 fb ff 02 80 00 00 00 |........|........|
|00005890| 03 fb ff fd 00 fc ff 00 | fe fd 00 00 3f fd ff 00 |........|....?...|
|000058a0| f8 fd 00 00 07 fd ff 00 | f0 fc 00 fd ff 00 e0 fc |........|........|
|000058b0| 00 00 1f fe ff 00 80 fc | 00 00 03 fe ff fa 00 02 |........|........|
|000058c0| 7f ff fc fa 00 02 07 ff | f0 fe 00 00 00 01 be f5 |........|........|
|000058d0| ff 01 c0 00 f5 ff 01 c0 | 00 f5 ff 01 c0 00 f5 ff |........|........|
|000058e0| 01 c0 00 f5 ff 01 c0 00 | f5 ff 01 c0 00 f5 ff 01 |........|........|
|000058f0| c0 00 f5 ff 01 c0 00 f5 | ff 02 c0 00 ff f6 ff 01 |........|........|
|00005900| c0 00 f5 ff 01 c0 00 f5 | ff 02 c0 00 7f f6 ff 02 |........|........|
|00005910| c0 00 7f f6 ff 02 c0 00 | 7f f6 ff 02 c0 00 7f f6 |........|........|
|00005920| ff 02 c0 00 7f f6 ff 02 | c0 00 7f f6 ff 03 c0 00 |........|........|
|00005930| 3f ff f7 ff 02 c0 00 3f | f6 ff 02 c0 00 3f f6 ff |?......?|.....?..|
|00005940| 02 c0 00 3f f6 ff 02 c0 | 00 1f f6 ff 02 c0 00 1f |...?....|........|
|00005950| f6 ff 02 c0 00 0f f6 ff | 02 c0 00 0f f6 ff 02 80 |........|........|
|00005960| 00 07 f6 ff 02 80 00 07 | ff ff f8 ff 02 80 00 07 |........|........|
|00005970| f6 ff 02 00 00 07 f6 ff | 02 00 00 07 f7 ff 03 fe |........|........|
|00005980| 00 00 03 f7 ff 03 fe 00 | 00 03 f7 ff 03 fc 00 00 |........|........|
|00005990| 01 f7 ff 03 fc 00 00 01 | f7 ff 00 f8 fe 00 f7 ff |........|........|
|000059a0| 00 f8 fe 00 fe ff fa ff | 00 f0 fe 00 f7 ff 00 f0 |........|........|
|000059b0| fe 00 00 7f f8 ff 00 e0 | fe 00 00 7f f8 ff 00 c0 |........|........|
|000059c0| fe 00 00 3f f8 ff 00 80 | fe 00 00 3f f8 ff 00 80 |...?....|...?....|
|000059d0| fe 00 00 1f f8 ff fd 00 | 00 1f f9 ff 00 fe fd 00 |........|........|
|000059e0| 00 0f f9 ff 00 fe fd 00 | 00 07 fe ff fc ff 00 fc |........|........|
|000059f0| fd 00 00 03 f9 ff 00 fc | fd 00 00 03 f9 ff 00 f8 |........|........|
|00005a00| fd 00 00 01 f9 ff 00 f8 | fc 00 f9 ff 00 f0 fc 00 |........|........|
|00005a10| 00 7f fa ff 00 e0 fc 00 | 00 3f fa ff 00 c0 fc 00 |........|.?......|
|00005a20| 00 1f fa ff 00 80 fc 00 | 00 07 fa ff fb 00 00 03 |........|........|
|00005a30| fe ff fe ff 00 fe fb 00 | 00 01 fb ff 00 fc fa 00 |........|........|
|00005a40| 00 7f fc ff 00 f0 fa 00 | 00 3f fc ff 00 c0 fa 00 |........|.?......|
|00005a50| 00 0f fc ff 00 80 fa 00 | 00 07 fd ff 00 fe f9 00 |........|........|
|00005a60| 00 03 fd ff 00 f8 f8 00 | fd ff 00 f0 f8 00 00 1f |........|........|
|00005a70| fe ff 00 c0 f8 00 00 07 | ff ff 01 ff 80 f7 00 fe |........|........|
|00005a80| ff f6 00 02 0f ff f8 f5 | 00 00 ff fa 00 00 00 00 |........|........|
|00005a90| 46 00 00 00 0c 00 00 00 | 24 00 00 00 16 52 65 74 |F.......|$....Ret|
|00005aa0| 75 72 6e 69 6e 67 20 74 | 6f 20 69 6e 64 65 78 0d |urning t|o index.|
|00005ab0| 20 20 20 20 20 20 20 53 | 74 61 6e 64 62 79 2e 2e | S|tandby..|
|00005ac0| 2e 00 01 00 00 00 00 00 | 10 00 0c 00 03 00 00 00 |........|........|
|00005ad0| 0c fd ea ff ff b9 af 00 | 00 00 12 20 00 20 00 70 |........|... . .p|
|00005ae0| 00 70 00 f8 00 f8 00 f8 | 00 70 00 20 00 00 00 00 |.p......|.p. ....|
|00005af0| 23 00 00 00 0c 00 00 00 | 01 00 00 00 16 78 00 01 |#.......|.....x..|
|00005b00| 00 00 00 00 00 0c 00 0a | 00 03 00 00 00 09 00 00 |........|........|
|00005b10| 00 00 00 00 00 00 00 8a | 00 00 00 0c 00 00 00 40 |........|.......@|
|00005b20| 00 00 00 3e 4e 4f 20 4d | 41 4e 27 73 20 4c 41 4e |...>NO M|AN's LAN|
|00005b30| 44 0d 49 6e 74 65 72 20 | 73 75 62 72 6f 75 74 69 |D.Inter |subrouti|
|00005b40| 6e 65 20 70 61 72 74 69 | 74 69 6f 6e 20 4e 6f 74 |ne parti|tion Not|
|00005b50| 20 4e 6f 72 6d 61 6c 79 | 20 45 6e 63 6f 75 6e 74 | Normaly| Encount|
|00005b60| 65 72 65 64 00 03 00 00 | 00 00 00 20 00 17 00 01 |ered....|... ....|
|00005b70| 10 00 00 18 00 00 00 00 | 00 00 00 00 00 0d 00 10 |........|........|
|00005b80| 00 0c 00 01 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005b90| 00 0e 00 17 00 12 00 01 | 00 00 00 12 00 00 00 00 |........|........|
|00005ba0| 00 00 00 00 00 0e 40 00 | 40 00 e0 00 e0 00 e0 00 |......@.|@.......|
|00005bb0| e0 00 40 00 00 00 4b ff | 00 60 fd 00 03 01 80 00 |..@...K.|.`......|
|00005bc0| f0 fd 00 03 03 c0 00 98 | fd 00 03 06 40 00 18 fd |........|....@...|
|00005bd0| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00005be0| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00005bf0| 00 18 fd 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|00005c00| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00005c10| 03 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|00005c20| 00 00 18 fd 00 01 06 00 | 01 00 18 fd 00 03 06 00 |........|........|
|00005c30| 00 18 fd 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|00005c40| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00005c50| 03 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|00005c60| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00005c70| 18 fd 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00005c80| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00005c90| 06 00 00 18 fd 00 00 06 | 02 00 00 18 fd 00 03 06 |........|........|
|00005ca0| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00005cb0| 18 fd 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00005cc0| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00005cd0| 06 00 00 18 fe 00 04 70 | 06 00 00 18 fe 00 2c d8 |.......p|......,.|
|00005ce0| 06 00 00 18 00 00 01 8c | 06 00 00 18 00 00 01 8c |........|........|
|00005cf0| 06 00 00 18 00 00 01 8c | 06 00 00 18 00 00 01 8c |........|........|
|00005d00| 06 00 00 18 00 00 01 8c | 06 00 00 18 fe 00 00 d8 |........|........|
|00005d10| 03 06 00 00 18 fe 00 04 | 70 06 00 00 18 fd 00 03 |........|p.......|
|00005d20| 06 00 00 1f fe ff 04 80 | 06 00 00 18 fd 00 03 06 |........|........|
|00005d30| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00005d40| 18 fd 00 04 06 00 00 1f | fe fe 00 03 06 00 00 18 |........|........|
|00005d50| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00005d60| 03 06 00 00 18 fd 00 04 | 06 00 00 1f fe fe 00 03 |........|........|
|00005d70| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00005d80| 00 18 fe 00 04 00 06 00 | 00 18 fd 00 04 06 00 00 |........|........|
|00005d90| 1f fe fe 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|00005da0| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00005db0| 04 06 00 00 1f fe fe 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00005dc0| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00005dd0| 00 18 fd 00 0b 06 00 00 | 1f ff ff 00 00 06 00 00 |........|........|
|00005de0| 18 fd 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00005df0| 00 03 06 00 00 18 ff 00 | 06 00 00 06 00 00 1f fe |........|........|
|00005e00| fe 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00005e10| 03 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 04 06 |........|........|
|00005e20| 00 00 1f fe fe 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00005e30| 00 18 fd 00 03 06 00 00 | 18 fe 00 04 30 06 00 00 |........|....0...|
|00005e40| 18 fe 00 0c 70 06 00 00 | 1f fe 00 00 30 06 00 00 |....p...|....0...|
|00005e50| 18 fe 00 04 30 06 00 00 | 18 fe 00 04 30 06 00 00 |....0...|....0...|
|00005e60| 18 fe 00 04 30 06 00 00 | 18 fe 00 05 30 06 00 00 |....0...|....0...|
|00005e70| 1f fe 06 00 00 30 06 00 | 00 18 fe 00 04 30 06 00 |.....0..|.....0..|
|00005e80| 00 18 fd 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|00005e90| fd 00 0b 06 00 00 1f ff | f8 01 ff fe 00 00 18 fd |........|........|
|00005ea0| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00005eb0| 06 00 00 18 fd 00 04 06 | 00 00 1f fe fe 00 03 06 |........|........|
|00005ec0| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00005ed0| 18 fd 00 03 06 00 00 18 | fd 00 04 06 00 00 1f fe |........|........|
|00005ee0| fe 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00005ef0| 03 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 04 06 |........|........|
|00005f00| 00 00 1f fe fe 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00005f10| 00 18 fd 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|00005f20| fd 00 04 06 00 00 1f fe | fe 00 03 06 00 00 18 fd |........|........|
|00005f30| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00005f40| 06 00 00 18 fd 00 0b 06 | 00 00 1f ff ff 00 00 06 |........|........|
|00005f50| 00 00 18 fd 00 02 06 00 | 00 00 18 fd 00 03 06 00 |........|........|
|00005f60| 00 18 fd 00 03 06 00 00 | 18 fd 00 04 06 00 00 1f |........|........|
|00005f70| fe fe 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00005f80| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 04 |........|........|
|00005f90| 06 00 00 1f fe fe 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|00005fa0| 00 00 18 fd 00 03 06 00 | 00 18 fe 00 14 f0 06 00 |........|........|
|00005fb0| 00 18 00 00 01 98 06 00 | 00 1f fe 00 03 18 06 00 |........|........|
|00005fc0| 00 18 fe 00 04 18 06 00 | 00 18 fe 00 02 30 06 00 |........|.....0..|
|00005fd0| 01 00 18 fe 00 04 60 06 | 00 00 18 fe 00 14 c0 06 |......`.|........|
|00005fe0| 00 00 1f fe 00 01 80 06 | 00 00 18 00 00 03 f8 06 |........|........|
|00005ff0| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00006000| 18 fd 00 03 06 00 00 1f | fe ff 04 80 06 00 00 18 |........|........|
|00006010| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00006020| 03 06 00 00 18 fd 00 04 | 06 00 00 1f fe fe 00 03 |........|........|
|00006030| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00006040| 00 18 fd 00 00 06 02 00 | 00 18 fd 00 04 06 00 00 |........|........|
|00006050| 1f fe fe 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|00006060| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00006070| 04 06 00 00 1f fe fe 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00006080| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00006090| 00 18 fd 00 04 06 00 00 | 1f fe fe 00 03 06 00 00 |........|........|
|000060a0| 18 fd 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|000060b0| 00 03 06 00 00 18 fd 00 | 0b 06 00 00 1f ff ff 00 |........|........|
|000060c0| 00 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|000060d0| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 04 06 00 00 |........|........|
|000060e0| 1f fe fe 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|000060f0| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00006100| 04 06 00 00 1f fe fe 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00006110| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 0e 06 00 |........|........|
|00006120| 00 18 00 00 01 fc 06 00 | 00 1f fe 00 00 04 18 06 |........|........|
|00006130| 00 00 18 fe 00 04 30 06 | 00 00 18 fe 00 04 70 06 |......0.|......p.|
|00006140| 00 00 18 fe 00 04 18 06 | 00 00 18 fe 00 14 0c 06 |........|........|
|00006150| 00 00 1f fe 00 00 0c 06 | 00 00 18 00 00 01 98 06 |........|........|
|00006160| 00 00 18 fe 00 04 f0 06 | 00 00 18 fd 00 03 06 00 |........|........|
|00006170| 00 18 fd 00 03 06 00 00 | 1f fe ff 04 80 06 00 00 |........|........|
|00006180| 18 fd 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00006190| 00 03 06 00 00 18 fd 00 | 04 06 00 00 1f fe fe 00 |........|........|
|000061a0| 03 06 00 00 18 ff 00 05 | 00 00 06 00 00 18 fd 00 |........|........|
|000061b0| 03 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 04 06 |........|........|
|000061c0| 00 00 1f fe fe 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|000061d0| 00 18 fd 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|000061e0| fd 00 04 06 00 00 1f fe | fe 00 03 06 00 00 18 fd |........|........|
|000061f0| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|00006200| 06 00 00 18 fd 00 04 06 | 00 00 1f fe fe 00 03 06 |........|........|
|00006210| 00 00 18 fd 00 04 06 00 | 00 18 00 fe 00 03 06 00 |........|........|
|00006220| 00 18 fd 00 03 06 00 00 | 18 fd 00 0b 06 00 00 1f |........|........|
|00006230| ff ff 00 00 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00006240| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 04 |........|........|
|00006250| 06 00 00 1f fe fe 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|00006260| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00006270| 18 fd 00 04 06 00 00 1f | fe fe 00 03 06 00 00 18 |........|........|
|00006280| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fe 00 |........|........|
|00006290| 04 18 06 00 00 18 fe 00 | 0c 38 06 00 00 1f fe 00 |........|.8......|
|000062a0| 00 78 06 00 00 18 fe 00 | 24 d8 06 00 00 18 00 00 |.x......|$.......|
|000062b0| 01 98 06 00 00 18 00 00 | 03 18 06 00 00 18 00 00 |........|........|
|000062c0| 03 fc 06 00 00 1f fe 00 | 00 18 06 00 00 18 fe 00 |........|........|
|000062d0| 04 18 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 03 |........|........|
|000062e0| 06 00 00 18 fd 00 03 06 | 00 00 1f fe ff 04 80 06 |........|........|
|000062f0| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00006300| 18 fd 00 02 06 00 00 00 | 18 fd 00 04 06 00 00 1f |........|........|
|00006310| fe fe 00 03 06 00 00 18 | fd 00 03 06 00 00 18 fd |........|........|
|00006320| 00 03 06 00 00 18 fd 00 | 03 06 00 00 18 fd 00 04 |........|........|
|00006330| 06 00 00 1f fe fe 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|00006340| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 03 06 00 00 |........|........|
|00006350| 18 fd 00 04 06 00 00 1f | fe fe 00 03 06 00 00 18 |........|........|
|00006360| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|00006370| 03 06 00 00 18 fd 00 01 | 06 00 02 00 1f fe fe 00 |........|........|
|00006380| 03 06 00 00 18 fd 00 03 | 06 00 00 18 fd 00 03 06 |........|........|
|00006390| 00 00 18 fd 00 03 06 00 | 00 18 fd 00 0b 06 00 00 |........|........|
|000063a0| 1f ff ff 00 00 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
|000063b0| fd 00 03 06 00 00 18 fd | 00 03 06 00 00 18 fd 00 |........|........|
|000063c0| 04 06 00 00 1f fe fe 00 | 03 06 00 00 18 fd 00 03 |........|........|
|000063d0| 06 00 00 18 fd 00 03 06 | 00 00 18 fd 00 03 06 00 |........|........|
|000063e0| 00 18 fd 00 04 06 00 00 | 1f fe fe 00 00 06 02 00 |........|........|
|000063f0| 00 18 fd 00 03 06 00 00 | 18 fd 00 03 06 00 00 18 |........|........|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.